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Die Nummer EINS ! 



In Vorbereitung: 

The last Ninja 

Gunship 

221 B Baker Street 

10th Frame 

In the living Daylights 

^ . 




Gauntlet 

Arkanoid 

Spindizzy 

Green Beret 



( Tel: 05231/29798 j [ Sky Runner 



Informieren könnt Ihr Euch außerdem 
in unserer aktuellen Sommerliste, die 
wie Euch gerne kostenlos zuschicken 

Also nichts wie ans Telefon, oder schreibt uns! 



S0FTH0USE 



<L 



SOFTHQUSE 

IiiIl Sascha Adolph. Langestraße 76. 4930 Detmold. TeL 05231729798 
% eingetragenes Warenzeichen der Atari Corporation. 



COM PUTRONIC— Aktion ! 



Der verflixte Punkt! 



Finden, schneiden, kleben ! 

Picken Sie sich Ihr Wunschprogramm aus dem 
riesigen Sortiment des Tronic-Verlags heraus ! 

Seit unserer Ausgabe 5/86 haben wir eine neue Treue-Aktion - den „verflixten Punkt" 
COMPUTRONIC ruft Ihnen zu: „Finden Sie auch in dieser Ausgabe den „roten 
Punkt"! Denn: Wenn man ihn aufgespürt und herausgeschnitten hat, sollte man das 
„Ding" schleunigst in den untenstehenden Coupon einkleben. Hat man -nach zwei wei- 
teren Computronic-Ausgaben - drei Punkte zusammen, dann heißt es, schnell den fer- 
tigen Coupon ausschneiden, das gewünschte Programm, das einem „zusteht" (Kassette 
oder Diskette!), eintragen und das Ganze zusammen mit fünf Mark (Unkostenbeitrag 
für Porto + Versand) an den TRONIC-Verlag schicken! „Ihr Wunsch ist uns Befehl"! 
D. h., wir werden so schnell wie möglich das Programm Ihrer Wahl abschicken! Einige 
„Schlitzohren" sind so clever und entscheiden sich bei IhrerWahl des Datenträgers für 
die neusten Disketten /Kassetten, obwohl diese manchmal noch gar nicht existieren. 
Aus diesem Grund haben wir die Programme, die bis zur nächsten Ausgabe aus der 
Wahlmöglichkeit fallen, mit einem Sternchen gekennzeichnet. Viel Spaß beim Suchen, 
Finden und Gewinnen! (T.B.) 




^j***- 



Ausschneiden und auf eine Postkarte 
kleben, abschicken an: 

Tronic-Verlag 
Postfach 870 
3440 Eschwege 

Computronic 



Ja, ich möchte eine Programmdiskette/ Kassette nach Wahl! 
Aus Ihrem Sofware-Service habe ich mir folgendes Angebot ausge- 
sucht: 

Bestell-Nr. Mein Computer^_^ 

□ Diskette D Kassette 

5 DM für Versandkosten liegen O als Verrechnungsscheck 

O bar bei! 
Hier sind meine „verflixten Punkte": 



Name: 



Straße: 
Ort: 




Kurz belichtet 




Vorwort 



In eigener Sache 
Muß das sein? 

Heimeoraputer, was kann man damit 
machen? Kochrezepte sammeln, Briefmar- 
ken registrieren, Terminkalender führen, 
Heizung steuern? 

Viele Hobby-Autoren haben sich den 
Trend zu Nutze gemacht, sich nicht nur mit 
den elektronischen Zwergen anzufreun- 
den, sondern selbst zu programmieren. 
Was dabei heraus kommt, kann sich sehen 
lassen. Autorennen auf grafisch hervor- 
ragend präparierten Rennstrecken, Räum- 
gleiter auf Exkursionen durch das- All, Ge- 
schicklichkeitsspiele, Denkspiele, alles, 
was es zu programmieren gibt. 
Für viele Autoren ist die Zusammenarbeit 
mit unserem Verlag zur Selbstverständlich- 
keit geworden. - Selbstverständlich ist es 
aber nicht, daß wir Programm einsendun- 
gen berücksichtigen, die man ohne weite- 
res als „geklaut" bezeichnen kann. Hier 
werden dem Verlag gegen Honorar Pro- 
gramme angeboten, die aus anderen Publi- 
kationen einfach abgeschrieben bzw. abge- 
tippt wurden. Ausgeschlossen ist, daß der- 
artige Betrügereien unentdeckt bleiben. In 
solchen Fällen reagieren unsere Leser so- 
fort und geben uns entsprechende Hinwei- 
se, die wir mit aller Sorgfalt verfolgen. Vor- 
fälle dieser Art haben uns zu ersten ernst- 
haften Maßnahmen gezwungen. So wer- 
den künftig alle Autor engehälter erst 1 4 Ta- 
ge nach Erscheinen der . entsprechenden 
Ausgabe gezahlt. D.h. im Klartext: für ge- 
klaute Programme gibt es kein Geld! Scha- 
de ist, daß ein schönes Hobby von einigen 
Wenigen ins Zwielicht gebracht und mit 
solchen Praktiken wir und unsere Leser ge- 
täuscht werden. 

(Der Herausgeber) 
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C-64 



MEGABOUNCER 

Das Topprogramm fiir den C-64 verlangt 
sehr viel Feingefühl von Ihnen. Mit einer 
Smilie* Figur gehen Sie auf Punktejagd. 
Dabei müssen Sie blitzschnell reagieren 
können. Sobald Ihr umherschwirrender 







Gegner die Energiequelle, die Sie gerade 
anzapfen, berührt, verlieren Sie ein Le- 
ben. Also immer darauf achten, daß Sie 
nie zur gleichen Zeit an der Energiequel- 
le saugen, denn sonst gehen Sie über den 
Jordan. Seite 6 



HAUNTED INN 

Bei Ihnen herscht wieder Hochsaison! Im 
Restaurant ist die Holle los. Überall gehen 
die Arme hoch und wird nach Ihnen geru- 
fen. Doch Sie bewahren die Ruhe und ver- 
suchen, jeden Gast zufriedenzustellen. 
Den Herrn mit dem Zigeunerschnitzel 
bringen Sie von seinem Wunsch ab mit 
dem Argument, daß Sie wegen eines 
Schnitzels nicht Ihren Zigeuner anschnei- 
den wollen. Ja, als Oberkellner hat man es 
schon schwer. Versuchen Sie also, Ihre Gä- 
ste bestens zu versorgen, damit sich Unmut 
gar nicht erst verbreitet. 
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Seite 14 



VC-20 



SAIGON 



Jeder Krieg braucht Helden! Bei Saigon 




können Sie zum großen Retter werden. In 
alter Rambo-Manier kämpfen Sie sich 
durch ein Gefangenenlager, aus dem Ihre 
gefangengehaltenen Kameraden nicht 
ohne Ihre Hilfe entkommen können. Lei- 
der ist Ihre Munition nur sehr begrenzt, 
und überall lauern Scharfschützen auf Sie. 
Vor allem dürfen Sie nicht vergessen, daß 
Sie mit den befreiten Kameraden wieder 
durch das Lager zurück müssen. Also nicht 
gleich alles verpulvern, was Ihnen an Mu- 
nition zur Verfügung steht. Seite 20 



C 16 



TRON 

Ein Spiel ohne Ende? - Nicht ganz! Der 
Wurm (Ihre Spielfigur) wird zwar mit zu- 
nehmender Spieldauer immer länger, 
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aber das ist auch gut so. Sie sollen näm- 
lich den gegnerischen Wurm einkesseln. 
Also seine Bewegungskreise so ein- 
schränken, daß ersieh irgendwann selbst 
in den Schwanz beißt. Kein leichtes Un- 
ternehmen, weil Ihr Gegner genau das 
gleiche vor hat. Passen Sie also auf, daß 
niemand Ihre Kreise zu sehr einengt. 

Seite 23 



SPECTRUM 



SENSQ PLUS 

Hier ist sie nun, die ultimative Version des 
Konzentrations-Klassikers! Worum es bei 

dem Spiel geht? Natürlich, Farbfolgen 

— . . . . 

19 




Computronic 




Kurz belichtet 




müssen nachgedrückt werden! Als Featu- 
res gibt's jede Menge Punkte, verschiedene 
Level, eine Highscoreliste und sogar die 
Option, Punkte in einem Glücksspiel zu 
riskieren. Aber Vorsicht; Riskieren Sie 
nicht zuviel, denn sonst sind die Punkte 
futsch, und Sie müssen sie sich wieder neu 
erkämpfen. Mehr Spaß kann ein Senso- 
Spiel nicht machen! „.. ,, 



CPC-464 




ORBIT-CHICANE 



Ein absolutes Knüllerspiel auf dem 
Schneider, Mit sehr viel Fingerspitzenge- 
fühl müssen Sie zu Ihrem Ziel gelangen. 




Ihr kleiner Astronaut mit Düsenrucksack 
auf dem Buckel hat einen starken Drang 
danach, Boden unter die Füße zu bekom- 
men. Sie müssen ihn aber in der Schwebe 
hatten und Gegenstände am Boden ein- 
sammeln. Wie schwer das sein kann, wer- 
den Sie schon gleich zu Beginn feststellen 
können. Bei diesem Spiet werden Sie 
sicherlich nicht nur einmal der Verzweif- 
lung nahe sein. Seite 41 







ATARI 



MÄSTERBLAZER 

Unser Software- Champion von 1986 hat 
wieder ein absolutes Spitzenspielerstellt. 
Masterblazer ist einfach ein „Muß* 4 für 
den kleinen Atari. Das Fußballspiel der 
Zukunft hat in unserer Redaktion schon 
fast Turnier- Charakter erreicht. Jeder 
wollte jeden schlagen. So kam es zu wirk- 
lich denkwürdigen Duellen, die keiner 
vergessen wird. Mit allen Tricks wurde 
hier gespielt. Alles war erlaubt, und alles 
wurde voll ausgenutzt Besser kann der 




Programmautor sicherlich auch nicht 
mehr spielen! ^ ^ 



KAMPFSTERN GALACTICA 

Der Titel sagt schon einiges aus, jedoch 
nichts über die absolut gute Spiel quali.tät. 
Die große Mission, die Sie erwartet, müs- 
sen Sie bewältigen. Finden Sie die Plane- 
ten, und befreien Sie diese von allem Übel. 
Die Einwohner werden Ihnen auf Ewigkeit 
dafür danken. Vielleicht erhalten Sie einen 
Space-Orden für Ihre mutigen Einsätze. 
Also: Nieht nach einem befreiten Planeten 
erst einmal ein Pauschen einlegen, sondern 
in Windeseile Ihre gefahrvolle Mission 
beenden! 




Seite 57 



TI-99 



BIATHLON 

Nun gibt es diesen Dauerrenner auch für 
die TI-Freunde. Zwar entspricht das Spiel 
nicht der Jahreszeit, aber das Wetter scheint 
dafür geradezu geeignet. Den außerge- 
wöhnlichen Härtetest für den Joystick gilt 




es mit der entsprechenden Bestzeit abzu- 
schließen. Jetzt nur nicht in Panik verfallen 
und wie ein Wilder an dem Knüppel rüt- 
teln. Hier kommt es auf gleichmäßigen 
Rhythmus an. Na, dann nichts wie in die 

Loipe! Seite 74 



APPLE 



SNACKIMACY 

Auch auf dem Apple haben wir wieder ein 
Programm vom Feinsten zu "bieten. Ihre 
Geschicklichkeit ist einmal mehr gefordert. 
Punkte haben echten „Sammlerwert" be- 
kommen. Denn auch bei Snackimacy heißt 
es Punkte in die eigene Tasche zu sammeln. 
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Leider schwirren Pfeile über die Spielflä- 
che, die Ihnen bei Ihrer Aufgabe das Leben 
schwer machen. Lassen Sie sich nur nicht 
beeindrucken, und heimsen Sie Punkt für 

Punkt ein. Viel Spaß! „ . 

Seite 77 
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Klartext _^____^_^__ 



Time-Ralfy (C-16) 
Goldfieber (C-16) 
Shooting (CPC) _ 

Impressum 
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Software-Katalog 
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Computronic 



Das C-64-Topprogramm dieser Ausgabe 



Die Tonicianer schlagen wieder zu! Dies- 
mal haben sie sich allerdings etwas Beson- 
deres einfallen lassen. Da sie inzwischen er- 
faßt haben, daß man die Menschheit nicht 
mit einer Raumflotte vernichten kann, ha- 
ben sie sich mit den Hohepriestern des 
Woolomoolo-Ordens verbündet. Gemein- 
sam wollen sie einen tödlichen Schlag ge- 
gen die Menschheit führen. Hierzu will 
man die Megabouncers nutzen, eine Dä- 
monenart, die seit 728 Jahren als ausgestor- 
ben gilt. Da die Tonicianer nicht so ohne 
weiteres glauben, was ein Mensch ihnen er- 
zählt, haben sie mit den Priestern eine De- 
monstration der Megabouncers ausge- 
macht. Einige komplett erhaltene Tempel- 
anlagen von unschätzbaren Wert sollen zer- 
stört werden. Selbstverständlich wußte 
man in der Militärbasis, Dr. Beuermannstr. 
23, schon längst Bescheid. Sofort entsandte 
man einen Agenten mit Sonderausrüstung 
dort hin: Nämlich Sie! 
Es gilt nun, den Megabouncers, mittels des 
Energieabsorbers (Smilie),ihre Energie zu 
entziehen, so daß sie für die Tonicianer 
wertlos werden. Günstigerweise haben die 
W.-Priester die Megabouncers bereits an 
den jeweiligen Demonstrationsorten po- 
stiert und mittels eines Energieregulato.rs, 
(kreisförmig, steht in der unteren Mitte des 
Bildschirms) der den Megabouncers ihre 
Kraft raubt, gefesselt. 



Der Spieler muß nun den Energieabsorber 
mit dem Energieregulator zusammenbrin- 
gen. Dadurch wird den Megabouncers 
sämtliche Energie geraubt. Hierbei muß er 
darauf achten, daß nur der Energieabsorber 
und der Energieregulator sich berühren. 
Sonst kommt es zu einem Kurzschluß 
durch Überlastung im Energieabsorber, 
was gleichbedeutend mit dem Verlust eines 
(von fünf) Lebens ist. 



Sobald Sie den Megabouncers 666 Energie- 
einheiten entzogen haben, sind diese unge- 
fährlich, und der jeweilige Level ist kom- 
plett. 

Die Anzeigen auf dem Bildschirm sind; 

Links: Die Energie, die Sie den Megaboun- 
cers entzogen haben 
Mitte: Score 
Rechts: Anzahl der Leben 





C-64 LI ST INS + CHECKSUMMEN <C VLB) 

POKE 5427B,fliPOKE 54278+7,0: POKE 34278+14,0 

8 A*=CHR*(34> iPRIHT" iCLEAR YELLOUJ "iPOKE 53281,1 

1:P0KE 53230,11 

11 PRIMTTflB(ll) "PflR0VISIONtSP^CE>COt1PftNY" 

14 POKE 54270,65; FOR WT=0 TO 5B:NEXT WT 

15 PRINTTABU6>"<D0WM2>PRESENTS"äFaR WT»=B TO 5BB 
:NEXT WT 

16 PfilHT- rDOifHZ UHI7£ R 1GH12 SU CR SJ CA SC SJ, $ 
y SC Sl Sü SC S7 CA SC SI_ SU. SC SI CR. SPACE CR £ 

Ä SL GR. su sc §z ££scsjrc4scsjsusc siy" 

17 PRINT" CHGffEV RISHT2 SB3 CO SPACE2 SB_ S PACE CS 
CG SC CJH CQ SC CM SB SPACE. SB2 SPACE §B5 SPACE2 
CR SPACE2 CQ CR SK SJ SC Sri" 

18 PRINT" LMGRFY~R 1GHT2 CX SPACE CX CZ. SC SK SJ S 
C SK Ol SPACE CX. 9J_ SC SK SJ SC SK SJ SC SK CE_ S 
J QX SJ_ SC SK CZ SC SK CX CZ. SPACE SJ. S& SK}" 

19 FÜR WT=0 TO 750t NE KT WT 

21 PRINTTAB<3>"<gi><;:K Dgg^>DOfS£4C£>YOlKS£4C£>U 
SE L SPACE JAISPACE gjf SOI» OI RVSOFF J IBK <SPAC£7BH\1 10 
Hii'PACEyOR" 



<240> 

<12> 

<219> 

<26> 

<21 1> 



<6> 



<22> 



<67> 
<217> 



<245> 



22 PRINTTAB(14)" CPPWOA I SP ACE RVSOH >C,l RVSQFF y A9S 
ETTE ZSPACEy RECORDER C SPACE y ?? " 

23 GET I*:IF I*<>"C" AND I*<>"D" THEN 23 

24 IF I*="D" TMEN POKE 2,B 

25 IF I*=="C" THEN POKE 2,1 

26 PE=PEEK(2) 

27 PRim"<. CLEAR WWTTE ? BOOT INS. , ■ " 

2B PRINT" ( D0HH2 O GREY JLOAD" A*" VEC" A*" . " j PE 

29 PRINT" {P0W/4>RUN"i IF PEEK(2>=1 THEN PRINT"RUN 

3B PRINT" £ DÖUH2 yL0Pß"M"DPiTPiSlSPACE> I "A*" , " ; PE 

31 PRINT" <. D0HN 4yRUN"t IF FEEK(2>=1 THEN PRINT"RUN 

32 PRINT" {.HOHE}" tFDH X=631 TO 634: POKE X,13:NEXT 
XsPDKE ivä,4 

ENDE DES LISTINGS 



<61> 

<63> 

<I52> 

<63> 

<37> 

<92> 

<114> 

<1B2> 
<74> 

<104> 

<92> 




C~64 LISTING + CHECKSUMMEN (C Vl.B» 

El POKE 1 6385, Bj POKE 16386, Bi POKE43,2t P0KE44,64i NE 
U 

ENDE DES LISTINGS 



<210> 
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C-64 LISTING + CHECKSUMMEN (C V1„0> 



PARAVISION COMPANY PRESENTS 

MEBABBUNCERS 

<C>19B7 BY PARAVISION COMPANY 



REM 

REM 

REM 

REM 

PR I NT" C C LEAR > " t POKE 53281, BsPOKE 53280,0 

PR I NT " WHITE J MEGABQUNCER5 ■ . . I BLACK J" 

FÜR X=49152 TO 49260tREAD DTtPOKE X,DTtNEXT X 

T*= " t SPACE? PARAV 1 3 1 ON tSPACEl COMPANY t SPACE t PRES 



ENTSl SPACE y mt SPACE 7 1 9B7 C S/MCCS >M£GABOUNCERS t SPA 
CE5 > WR I TTEN C SPACE > 1 986 " 

10 T*=T*+ " /S7 1 SP^Cf >B Y CSP4CCJ ULR I CH J SPACE 1 MUEHL { 
SPACE4 J L I CEN9ED I SP ACE > AT C SP4CO TRQN IC-VERLAG i SPA 
Cf4 > (C) 1 9B7f S/MCE ymtSPACE JPARA" 

11 T*=T*+"VISIQN<SP /ICC lCOM"pANY{ SP4CC?* >g" 

12 FOR X = l TD LENtTS) tPRINT" ^ CLEAf fi "} MID$ <T«,X , 1 
):POKE 49152+255+X,PEEK<1024) :NEXT X 

13 FOR X=55296 TO 55335 STEP BsPOKE X,7iPOKE X+l 
,BiPOKE X+2,2lP0KE X+3,4 

14 POKE X+4,6:P0KE X+5,14:POKE X+6,5:P0KE X+7,13 
:NEXT X 

15 POKE B28,BsSYS 49152 

16 FOR X=S192 TO 10559:READ DTiPUKE X,DTsNEXT X 

17 DATA120,169,26,141,20,3,169,192, 141 ,21 ,3, BB, 9 
6, 1 20, 149, 49, 141,20,3,169 

18 DATA234, 141, 21, 3, 88 ,96, 238, 2, 0,173, 2, 0,201, 6, 
28B, 42, 169, 0,1 41, 2, 0,162,1. 

19 DATA1B9, 0,4, 157, 255, 3, 232, 224, 40, 208, 245, 174, 
60,3, 189,0,193,201,0,208,5 

20 DATA162, 0,142,60,3,189,0, 193,141,39,4,238,60, 
3,173,2,0,41,2,208,21,173 

21 DATA0, 216, 72, 162, 1,189, 0,216, 137, 255, 215, 232, 
224, 40, 20B, 245, 104, 141, 39 

22 DAT A2 16, 76, 49, 234 

23 DATA3, 240, 0,14, 236,0, 59, 185, 0,62, 233, 0,251 ,17 
0,64,238,169,64,250,166,64 

24 DATA234, 153, 64, 59, 101, 0,57, 153, 0,6, 100, 0,1, 80 
,0,0,0,0,0,0,0,0,0,0,0,0,0 

25 DATA0, 0,0,0,0,0, 0,0, 0,0,0,0,0, 0,0, 0,3,240,0,1 
4, 10B, 0, 57, 1B5, 0,54, 237,0 

26 DATA219, 182,64,238,217,64,251,102,64,237,155, 
64,54, 109, 0,57, 185,0, 6, 22B 

27 DATAO, 1,80,0,0,0, 0,0, 0,0, 8, 0,0, 0,8, 0,0,0,0,0, 
0,0,0,0,0,0,0,0,0,0,0,0,3 

28 DATA240,0, 14, 10B,0,57, 153,0,54, 101 ,0,217, 15B, 
64,230, 123, 64, 217, 23B, 64, 231 

29 DATA187,64,62,237,0,59,1B5,B,6,22B,0,1,80,B,0 
,0,0,0,0,0,0,0,0,0,0,0,0,0 

30 DATA0, 0,0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 3, 240, 0,14, 23 
6,0,59,153,0,62,101,0,249 

31 DATA158,64,230,123,64,217,238,64,231,1B3,64,6 
2,229,0,59,153,0,6,100,0,1 

32 DATAB0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,8,0, 
0,0,0,0,0,0,0,0,0,0,0,0,0 

33 DATAO, 0, 0, 0, 252, 0,15 ,171,1 92, 5B, 254, 144, 59, 16 
9, 144,23B,1B6, 100,238,230 

34 DATA 100 , 238 , 230 , 100 , 239 , 1 54 , 1 00 , 59 , 1 69 , 1 60 , 58 
,B6, 144,5, 169,64,0,84,0,0 

35 DATAO, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0 
,0,0,0,0,0,0,0,252,0,15,255 

36 DATA192, 63, 171,80, 62, 1B6, 80, 250,230, 148, 251,1 
69,148,251,169,148,250,230 

37 DATA14B.62, 154, 144,61 , 169 , B0, 5 ,85,64,8,84 ,0,0 
,0,0,0,0,0,0,0,0,0,0,0,0,0 

38 DAT A0, 0,0, 0,0 ,0,0, 0,0, 192, 0,0, 192, 0,0, 192, 0,0 
,192,0,15,252,0,63,255,0,175 

39 DATA254, 128, 42, 170, 0,1 70, 42, 128, 26, 169, 0,3, 84 
,0,0,64,0,0,64,0,8,64,0,0 

40 DATA64, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,8, 0,0, 0,8,0, 
0,0,192,0,0,192,0,0,192,0 

41 DAT A0, 192, 0,15, 252, 0,63, 255, 0,175, 254, 12B, 138 
, 1 70 , 1 28 , 1 70 , 1 38 , 1 28 , 26 , 1 69 

42 DATA0, 5, 84, 0,0, 64, 0,0, 64, 0,0, 64, 0,0, 64, 0,0,0, 
0,0,0,0,0,0,0,0,0,0,0,0,0 

43 DAT AB, 0,0, 0,0, 192, 0,0, 192, 0,0, 192, 0,0, 192, 0,1 
5,252,8,63,255,0,175,254,129 

44 DATA170, 170, 128, 162, 162, 12B, 26, 169,0,5,84,0,0 
,64,0,0,64,0,0,64,0,0,64,0 

45 DATA8, 0,0, 0,0, 0,8, 0,0, 0,0, 0,0,0,0,0,0, 0,0, 0,1 



<10B> 

<95> 

<15S> 

<14B> 

<72> 

<244> 

<216> 



<108> 

<16> 
<127> 

<78> 

<226> 

<1B8> 

<61> 

<181> 

<251> 

<55> 

<2> 

<54> 

<21B> 
<33> 

<4> 

<41> 

<183> 

<40> 

<19> 

<65> 

<221> 

<B2> 

<3> 

<35> 

<235> 

<152> 

<249> 

<122> 

<21> 

<250> 

<16B> 

<182> 

<i47> 

<1> 

<218> 

<2> 



92,0,0, 192,0,0,192,0,0,192 

46 DATA0, 15, 252, 0,63, 253, 0,1 75, 254, 128,170, 168,1 
28,168, 170,1 2B, 26, 169 ,0,5 

47 DAT AB4, 0,0, 64, 0,0, 64, 0,0, 64, 0,0, 64, 0,0, 0,0,0, 
0,0,0,0,0,0,0,0,0,0,0,0,0 

48 DATA0 ,0,0, 252 , , 15 , 1 71 , 1 92 , 58 , 1 70 , 1 44 , 5B , 1 70 , 
144,235,171,164,236,108,100 

49 DATA233,169,164,234,186, 164,58,230, 144,58,230 
,144,5,169,64,0,04,0,0,0,0 

50 DATAO, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0 
,0,0,0,0,0,252,0,15,171,192 

El DATA58, 170, 144,59, 171 , 144,236,10a, 100,233, 169 
,164,234,170,164,234,186,164 

52 DAT A58, 230, 144, SB, 230, 144, 5, 169, 64, 0,84, 0,8,0 
,0,0,0,0,0,0,0,0,0,0,0,0,0 

53 DATAO, 0,0, 0,0, 0,0, 0,0,0,0, 0,0, 0,252,0 ,15, 171, 
192,58, 170, 144, SB, 254, 144 

54 DATA235, 1,164, 234, 96, 164. 234, 170, 164, 234, 186, 
1 64 , 58 , 230 , 1 44 , 5B , 230 , 1 44 

55 DATA5, 169, 64, 0,64,0,0,0, 0,0, 0,0, 0,0, 0,0, 0,0,0 
,8,0,0,0,0,0,0,0,0,0,0,0,0 

56 DATA0,0,0,252,0,15,171 , 1 92, 58, 170, 144 , 5ß, 186, 
144,234,198,164,234,154,164 

57 DATA234 ,170,164, 234 , 186 , 1 64 , 58 , 230 , 1 44 , SB , 230 
,144,5,169,64,0,84,0,0,0,0 

58 DATAO, 0,0, 0,0, 0,0, 8, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0,0 
,0,0,0,0,0,252,0,15,171 ,192 

59 DATA5B.170, 144,58,170, 144,234,186, 164,234, 198 
, 164,234, 154, 164,234, 1B6, 164 

60 DAT A5B, 230, 144,58,238, 144,5, 169, 64,0, B4 ,0,0,0 
,0,8,0,0,0,0,0.0,0,8,0,0,0 

61 DATAO, 0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,252, 204, 252, 4B, 
204, 192,48,252,240,48,204 

62 DATA1 92, 48, 284,252, 0,0, 0,252, 0,252 ,171 ,3,168, 
86,206,84,85, 185 ,84 , B4, 100 

63 DATA84 ,84 , 16,84 , B4 , ,B4 ,84 , , 84 ,84 ,0 ,84 , 84 ,0 , 
84 , 84 , , 84 , 84 , , 84 , B4 , , 84 

64 DATA84, 0,84, 84,0,84, 0,63, 12, 63, 31 ,51 ,51 ,63,63 
,63,48,51,60,48,51,51,0,0 * 

65 DATAO, 255, 255, 252, 178, 170 , 16B,85,85,84 ,84 ,0,0 
,84,0,0,87,255,192,86,170 

66 DATA129, 85,85, 64, 84, 0,0, 84, 0,0, 84,0,0,84, 0,0, 
87,255,252,86,170, 16B,B5,85 

67 DATA84,0,12,51,4G,51 ,51, 51, 63, 51, 48, 31, 51, 48, 
51 ,12,51,0,0,0,15,255,192 

68 DATA5B, 170, 176,229,B5, 108,148,0,24,84,0,4,84, 
0,8,84,0,0,84,0,0,114,63,252 

69 DATAB4 , 42 , 1 69 , 84 , 2 1 , 84 , 84 , , 52 , 87 , 255 , 22B , 22 , 
178, 144,5,85,64,0,243,12,60 

70 DATA3,51,51, 195, 51, 51, 51, 51 ,51, 195, 12, 51, 0,0, 
0,0,252,0,3,171,O,14,B6,192 

71 DATA57, 1,176, 228, 0,108,148,0,88, 84, 0,84,84,0, 
84, 87, 255, 84, B6, 170, 84, B5 

72 DATA85, 84, 84, 0,84, 84,0, 84, B4, 0,84, 84, 0,84, 0,0 
, , , O , , 240 , 255 ,3,172, 234 

73 DATA206, 91, 229, 190, 91, 229, 190, 91, 229, 190, 91, 2 
29,190,91,229,190,91,229,190 

74 DATA91,234,206,91,255, 14,91 ,234,206,91,229,19 
0,91,229,190,91,229,190,91 

75 DATA229, 190,91 ,229,190,91,229,179,172,234,192 
, 240 , 255 ,0,0,0, 229 ,176,0, 229 

76 DATA190, 91, 229, 190, 91, 229, 190, 91, 229, 190, 91, 2 
29,191,153,229,191 ,155,229 

77 DATA191, 235, 229, 190,233,229,198,251,229,190,1 
87,229,190, 191,229,190, 111 

78 DATA229, 190, Hl, 229, 190, 91, 229, 190, 91, 229, 190 
,91,58,206,91,15,14,91,0,14 

79 DAT A91, 0,0, 0,0,0,0,0, 0,15, 255, 13, 14, 170, 58, 20 
6,85,229, 190, 64, 22B, 110,64 

80 DATA22B,30,64,228,14,84,228,14,16B,228,15,252 
,228,14, 16B, 228,14,84,228 

81 DATA14,64,22B,14,64,22B, 14,64,228,14,64,228,3 
0, 64.22B, 110,85,229,190,170 

82 DATA5B, 207, 255, 15,0,0,0,255,0,0,234, 192,252,2 
29,179,171,229,190,86,229 

83 DATA198, 65, 229, 190, 64, 229, 190, 64, 229, 198, 64, 2 
34,206,80,255,11,164,235,6,. 

B4 DATA249, 235, 1,174, 235, 0,91, 230, 192,27,230,192 

,27,230,196,27,229,185,27 

BS DATA229, 190, 91, 229, 179, 172, 0,8, 248, 0,0,0,0,0, 

255,0,3,255,192,15,255,224 

86 DATA15, 255, 176,63,254,220,63,251 ,120,63,253,2 
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20,255,255, 153, 254, 255, 181 

B7 DAT A251 , 255 , 14«? , 237 , 255 , B5 , 55 , 1 B9 , 84 , 38 , 1 81 , 8 

4, 57, 149, 84,6,85,80, 9, BS, 80 

HB DATA 1,85, 64, 0,85, 0,61,0,0,19, 0,0, 0,0, 0,0,0, 253, 

0,3,255,192, 15,255,224,15 

09 DATA255, 176,63,254,220,63,251 ,120,63,233,228, 

255,170,153,254,170,101,251 

90 DATA170, 149, 237, 170, BS, 55, 169, 84, 30, 101 ,84, 57 
,149,B4,6,B5,80,9,B5,B0,1 

91 DATA85, 64, 0,85, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 255,0, 
3,255,192, 15,253,224,15,255 

92 DATA176, 63, 254, 220, 63, 251, 120, 63, 213, 228, 255, 
85,153,254,85,101,251 ,85,149 

93 DATA237,95,85,55,149,84,30,1B1,B4,57,149,84,6 
, 85, 80, 9, B5, 80,1 ,85,64,0,85 

74 DATA0, 0,0, 0,0, 0,0, 0,0, 0,0, 0*1 92, 0,0, 192, 0,3, 2 
40,0,3,160,0,15,168,0,14,232 

95 DATA» , 62 , 234 , 0, 58 , 154 ,0 , 250 , 154 , 128,238, 106,6 
4,238,106,64,170,185,64,42 

96 DATA185, 0,42, 101, 0,10 ,100, 0,10, 1^8, 0,2, 144,0, 
1,60,0,0,64,0,0,64,0,0,0,0 

97 DATA0, 0,192, 0,0, 192, 0,3, 240, 0,3, 160, 0,15, 168, 
0,14,104,0,62,106,0,59,170 

98 DATA0, 251, 170, 128, 230, 174, 64, 230, 174, 64, 171,1 
53,64,43,153,0,42,165,0,10 

99 DATA164, 0,10, 148, 0,2, 144, 0,1, 80, 0,0, 64, 0,0, 64 
,01,0,0,0,8,0,192,8,0,192,0 

100 DATA3, 240, 0,3, 160, 0,15, 168, 8, 14, 168, 0,62, 170 
,0,57,186,0,249,186,128,234 

101 DATA230, 64, 234, 230,64, 169, 169, 64, 41, 169, 0,42 
,229,0, 10,228,0,10, 14B, 0,2 

102 DATA144,0,1 ,80,0,0,64,0,0,64,0,0,0,0,0,3 

103 DATA 240, 0, 15, 252, 0, 63, 253, 

104 DATA 61 f 223, 0, 253, 223, 192, 255, 255, 19 



105 DATA 170, 234, 128, 

106 DATA 10, 232, 0, 2, 

107 DATA 0, 0, 0, 0, 0, 



108 DATA 0, 

109 DATA 0, 

110 DATA 

111 DATA 2, 



0, 0, 0, 0, 
0, 0, 0, 0, 



46, 174, 0, 43, 186, 
160, 0, 0, 0, 
0, 0, 0, 
0, 0, 0, 
0, 0, 0, 







160, 0, 10, 168, 0, 42, 
0, 170, 170, 128, 



170, 

170, 170, 12 



112 DATA 42, 170, 
8 

113 DATA 255, 191, 192, 59, 251, 0, 62, 239, 

114 DATA 15, 188, 0, 3, 240, 0, 8, 0, 



0, 0, 0, 0, 0, 0, 0, 

0, 0, 0, 0, 0, 0, 0, 

0, 0, 0, 0, 0, 0, 0, 

80, 0, 5, 84, 0, 21, 85, 



115 DATA 0, 

116 DATA 0, 

117 DATA 0, 

118 DATA 

119 DATA 1 , 

120 DATA 23, 117, 64, 87, 117, 64, 85, 85, 64 

121 DATA 170, 106, 12B, 3B, 166, 0, 41, 154, 

122 DATA 10, 104, 0, 

123 DATA 0, 0, 0, 0, 



2, 160, 0, 0, 0, 
0, 0, 0, 0, 





174 DATA 0, 0, 0, 0, 0, 0, 0, 0, 

125 DATA 0, 0, 0, 0, 0, 0, 0, 0, 

126 DATA 

127 DATA 2, 160, 0, 10, 168, 0, 42, 170, 

128 DATA 42, 170, 0, 170, 170, 128, 170, 170, 
8 

!29 DATA 255, 191, 192, 59, 251, 0, 62, 239, I 

130 DATA 15, 188, 0, 3, 240, 0, 0, 0, 

131 DATA 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 



12 



132 DATA 0, 

133 DATA 0, 

134 DATA 

135 DATA 3, 240, 0, 14, 172, 0, 57, 91, 

136 DATA 57, 219, 0, 231, 182, 192, 23t, 182, 19 
2 

137 DATA 231, 182, 192, 57, 219, 0, 57, 91, 
13B DATA 14, 172, 0, 3, 240, 0, 0, 0, 

0, 0, 0, 0, 
0, 0, 0, 0, 
0, 0, 0, 0, 



139 DATA 0, 0, 0, 0, 

140 DATA 0, 0, 0, 0, 

141 DATA 0, 0, 0, 0, 

142 DATA 

143 DATA 2, 160, 0, 9, 88, 0, 37, 214, 

144 DATA 39, 1B2, 0, 158, 109, 12B, 158, 109, 12 
B 

145 DATA 158, 109, 128, 39, 182, 0, 37, 214, 

146 DATA 9, 88, 0, 2, 160, 0, 0, 0, 8 

147 DATA 0, 0, 0, 0, 0, 0, 0, 0, 

148 DATA 0. 0, 0, 0, 0, 0, O, O, 



<112> 

<179> 

<104> 

<92> 

<144> 

<58> 

<201> 

<38> 

<75> 

<9> 

<159> 

<146> 

<248> 

<39> 

<213> 

<160> 

<4B> 

<206> 

<231> 

<67> 

<104> 

<142> 

<143> 

<144> 

<81> 

<10> 

<23B> 

<88> 

<190> 

<150> 

<131> 

<152> 

<89> 

<198> 

<162> ' 

<179> 

<111> 

<158> 

<159> 

<160> 

<97> 

<26> 

<246> 
<104> 
<206> 
<166> 
<167> 
<16B> 
<105> 
<191> 

<15l> 
<214> 
<163> 
<174> 
<175> 
<176> 
<113> 
<24> 

<127> 

<11> 

<120> 

<1B2> 

<1B3> 



0, 0, 0, 

0, 0, 

0, 0, 

0, 0, 

0, 37, 214, 



0, 37, 214, 

0, 

B 








149 DATA 0, 0, 0, 0, 0, 0, 0, 0, 

150 DATA 

151 DATA 1, B0, 0, 5, 212, 0, 23, 181, 

152 DATA 30, 109, 0, 121, 219, 64, 121, 219, 64 

153 DATA 121, 219, 64, 30, 109, 0, 23, 181, 

154 DATA 5, 212, 0, 1, 80, 

155 DATA 0, 0, 0, 0, 0, 0, 

156 DATA 0, 0, 0, 0, 0, 0, 

157 DATA 0, 0, 0, 0, 0, 0, 

158 DATA 

159 DATA 2, 160, 0, 9, SB, 

160 DATA 39, 182, 0, 158, 109, 12B, 15B, 109, 12 
8 

161 DATA 138, 109, 128, 39, 182, 

162 DATA 9, 88, 0, 2, 160, 0, 0, 

163 DATA 0, 0, 0, 0, 0, 0, 0t 8. 

164 DATA 0, 0, 0, O, 0, 0, 0, 0» 

165 DATA 0, 0, 0, 0, 0, 0, 0* «* 

166 DATA 

167 FDR X=122BS TO 13567sREAD DT:POKE X.DTiNEXT 

X 

168 DATA9, 9 ,61, 54, 116, 68, 0,60, 12, 30, 51, 63, 102, 10 
2,102,0,62,51,51,62,102,102 

169 DATA124,0,30,51,48,4B,96,102,60,0,60,54,51,3 
1,102,108,120,0,63,45,48,60 

170 DATA96, 96, 126,0, 63, 4B, 48, 60, 96, 96, 96, 0,30,31 
,48,55,102,102,60,0,51,51,51 

171 DATA63, 102, 102, 102, 0,30, 12, 12, 12, 24, 24, 60,0, 
15, 6, 6, 6, 12, 108, 56, 0,51, 54 

172 DATA60,56,120,108,182,0,4B,4B,48,48,96,96,i2 
6,0,49,59,63,53,99,99,99,8 

173 DATA51, 59, 63, 63, 110, 102, 102, 0,30, 51, 51 ,31, 10 
2,102,60,0,62,51,51,62,96,96 

174 DATA96, 0,30, 51, 51, 51, 102, 60, 14, 0,62, 51, 51, 62 
, 120, 188, 102,0,30,51 ,4B,30 

175 DATA6, 102,60,0,63, 12, 12, 12,24,24,24,0,51,51, 
51,51,102,102,60,8,51,51,31 

176 DATA51, 102, 68, 24, 0,49, 49,49, 53, 127, 119,99,0, 
51,51,38,12,68,102,102,0,51 

177 DATA51, 51, 30, 24, 24, 24, 0,63, 3, 6, 12, 48 ,96, 126, 
0,30,24,24,24,48,48,60,0,6 

17B DATA9, 24, 62, 48, 98, 252, 0,30, 6,6, 6, 12, 12, 60,0, 
0,12,30,63,24,24,24,24,0,8 

179 DATA24, 63, 127, 48, 16,0, 0,0, 0,0,0, 0,0, 0,12, 12, 
12,12,0,0,24,0,31,51,51,0,0 

180 DATA«, 0,0, 51, 51, 127, 51 ,255, 102, 102, 0,12, 31, 4 
8,30,6,124,24,0,49,51,6,12 

181 DATA48, 102,70,0,38,51 ,38,28,103, 102,63,8,3,6 
,12,0,0,0,8,0,6,12,24,24,48 

1B2 DATA24, 12, 0,24, 12, 6, 6, 12, 24, 48, 0,0, 51, 30, 127 
,60,102,0,0,0,12,12,63,24,24 

183 DATA0, 0,0, 0,0, 0,0, 24, 24, 48,0, 0,0, 63, 0,0, 8,0, 
0,0,0,0,8,24,24,0,0,1,3,6,24 

184 DATA48, 96, 0,30, 51, 55, 59, 102, 102, 68, 0,12, 12, 2 
8,12,24,24,126,0,38,51,3,6 

185 DATA48, 96, 126, 8,30,51, 3, 14, 6, 182, 60, 8, 3, 7 ,15 
,51,127,6,6,0,63,48,62,3,6 

186 DATA102, 68, 8, 38, 51, 48, 62, 182, 102, 60, 8, 63, 51, 
6,12,24,24,24,0,38,51,51,30 

187 DATA1B2, 102, 60, 8, 30, 51, 51, 31, 6, 102, 60, 0,0,0, 
12,0,0,24,0,0,8,0,12,0,0,24 

188 DAT A24, 48, 7, 12, 24, 48, 48, 24, 14, 8, 8, 0,63, 8, 126 
,0,0,0,56,12,6,3,12,24,112 

1B9 DATA0, 30, 51, 3, 6, 24, 8, 24, 0,8, 8, 8, 127, 255, 0,0, 
0,213,213,53,53,53,13,13,3 

190 DATA85,B5,B5,B3,8S,B5,B6,89,1B6,150,104,132, 
104, 160, 96, 12B, 214, 2 14, 214 

191 DATA214, 214, 214, 214, 214, 3, 12, 15, 93, 87, 93, 247 
,205,117,213,95,85,85,05,85 

192 DATAB5„128,96,96,BB,B8,88,B5,B5,63,221,213,2 
13,213,213,217,74,255,221,85 

193 DATA8S, 85, 85, 153, 170, 253, 222,86,36,86, 86, 138 
,168,0,8,8,0,3,13,53,213,3 

194 DATA13, 53, 213, 85, 85, 85, 85, 0,8, 0,0, 0,0, 60, 255 
,128, 96, 08, 86, 85, BS, 85, 85,0 

195 DATA0,0,0,128,96,8B,86,85,85,85,B5,B5,85,B5, 
85,0,0,0,15,253,2,8,0,12,63 

196 DATA255, 255, 95, 165, 10, 0,15, 63, 255, 255, 125, 15 
8,40,0,0, 240 , 252 , 247 , 90 , 160 

197 DATA0,0,S5,B5,87,87,a7,213,117,223,125,214,B 
5,85,85,214,121,215,85,85,149 

198 DATA149, 149, 87, 93, 247, 119, 154,181, 149, 85, 85, 
85, B7, 85, 150, 121, 121, 121, 21 4 
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199 0ATA214, 83,221,166, 89,96,85,85, 85, 149, 255, 21 
4,214,214,214,214,214,170,235 <Ah> 

200 DATA95 , 85 , 85 , B5 , 85 , 85 , 1 70 , 85 , 85 , 1 70 , B5 , 85 , B5 
,85,85,85,85,170,170,85,85 <12A> 

201 DATA85,85,B5,85,B5,178,170,17B,85,85,B6,B6,1 

70, B7, 101, 101, 147, 147,86, 86 <14> 

202 DATAI70,178,101,101 , 147, 149, B6, 86, 89, 170, 170 
,170,147,149,86,86,89,89,101 <28> 

203 DATA101 , 149, 149, 149, 149, 170, 101 ,89,89,86,86, 
149,147,170,17(9,89,89,86,86 <129> 

204 DATA149, 149, 101, 170,170, 170, 86, 86, 149, 149, 10 

1 , 101, B9.B9, 06,86,85, 125, 121 <160> 

205 DATA121 , 121 ,121 , 105, BS, 255, 85, 125, 121 , 121 ,10 
5,85,170,85,85,85,85,86,89 <249> 

206 DATA101,147,86,B7,101,i49,8S,85,B5,S5,B3,85, 
85,85,85,85,105,170,213,117 <35> 

207 DATA93, 87, 85, 83, 85,85, 85, 85, 85, 85, 213, 117, 93 

,87, 255, 85, 85, 83, 85, 85, 83, B5 <79> 

208 DATA255,85, 123, 121 , 121 , 121 , 1 05, B5, 0,56, 56, 56 
,56,56,56,56, 105, 131 , 131 , 131 <76> 

209 DATA131, 131, 131, 125, 240, 255, 255,255, 255, 255, 
255,255,0,240,255,255,255,255 <102> 

210 DATA255, 255, 0,0, 240, 255, 255, 255, 255, 253, 0,0, 
0,240,255,255,255,255,0,0,0 <62> 

211 DATA0j~240, 255, 255, 255, 0,0, 0,0, 0,240, 255, 255, 
0,0,0,0,0,0,240,255,0,0,0,0 <B4> 

212 DATA0, 0,0, 240, 0,0, 0,0, 0,0, 0,15, 0,0, 0,0, 0,0,1 
5,255,0,0,0,0,0,15,255,255 <237> 

213 DATA0, 0,0, 0,15, 255, 255, 255,0, 0,0, 15, 255, 255, 
255,255,0,0,15,255,255,255 <43> 

214 DATA255, 255, 0,15, 255, 255, 255, 255, 255, 255, 15, 
255,255,255,255,255,255,255 <62> 

215 DATA175, 153, 157, 159, 159, 153, 195,255, 135, 147, 
153,153,153,147,135,255,129 <64> 

216 DATA159, 159, 135, 157, 159, 129,255, 129, 159, 159, 
135,157,159,159,235,195,153 <26> 

217 DATA159, 145, 153, 153, 195, 255, 133, 153, 153, 129, 
153,153,153,255,195,231,231 <45> 
21B DATA231, 231, 231, 175, 255, 225, 743, 243, 243, 243, 
147,199,2S5,t53,147,135,143 <20> 
217 DATA135, 147, 153,255, 159, 159,159, 159, 159, 159, 
129,255, 156, 136, 128, 14B, 156 <15> 

220 0ATA156, 156,255, 153, 137, 129, 129, 145 ,153 ,153, 
235,195,153,153,153,153,153 <45> 

221 DATA195,25S, 131 ,153, 153,131 , 159,159, 159,255, 

195, 153, 153, 153, 153,195,241 <16B> 

222 DATA255, 131 , 153, 153, 131 , 135, 147, 153,255, 195, 
153,159,195,249,153,195,255 <146> 

223 DATA129,231,231 ,231,231,231,231,255,153,153, 
153,153,153,153,193,255,153 <170> 
22t DATA1 53 , 1 53 , 1 53 , 1 53 , 1 95 , 23 1 , 255 , 1 56 , 1 56 , 156 , 

14B, 120, 136, 156,255, 153, 153 < 17B> 

225 DATA195, 231 , 195 , 153, 153 , 255 , 153, 153 , 1 53 , 195 , 

231 ,231 ,231 ,255,127,247,243 <254> 

226 DATA231, 207, 159, 129, 255, 195, 207, 207, 207, 207, 
207,175,255,243,237,207,131 <7> 

227 DATA207, 157, 3, 255, 195, 243, 243, 243, 243, 243, 17 
5,255,255,231 , 175,129,231 ,231 <160> 

228 DATA231, 231, 255, 239, 207, 128, 128,207,237,235 <101> 
31777 FÜR X=2048 TD 4102tREAD DTiPOKE X.DTiNEXT 

X <74> 

32000 DATA72 , 152 , 72 » 13B , 72 , 162 , 13 , 160 ,2&S ,136,20 
8,253,2B2,20B,24B,104,170,104 <169> 

32001 DATA168, 104, 76, 174, 2,21, 160, 32, 173, 3, 21, 24 
,109,0,21,141,0,212,141,3,21 <117> 

32002 DATA173,4,21 ,24, 109, 1 ,21 , 141 . 1 ,212, 141 ,4,2 
1,32,0,8,136,132,208,226,202 <232> 

32003 DA7A138, 208, 217, 96, 32, 0,16, 142, 1,21, 32, 0,1 

6, 142,2,21 ,96,32,0, 16, 142,0,20B <24B> 

32004 DATA32,0,16,142,1,20B,32,0,16,142,2,208,32 
,0,16,142,3,208,32,0,16,142,4 <20> 

32005 DATA20S, 32, 0,16, 142, 5, 208, 32, 0,16, 142, 6, 20 
8,32,0,16,142,7,208,32,0,16,142 <81> 

32006 DAT AB, 208, 32,0, 16, 142,9,208,32,0, 16, 142, 10 

,20B, 32, 0,16 ,142, 11, 208,32,0 <1B5> 

32007 DATA 16, 142, 12, 208, 32, 0,16, 142, 13, 208, 32,0, 
16,142, 14,20B,32,0,16,142,15 <6B> 

32008 DATA208, 32, 0,16, 142, 21, 208, 96, 32, 0,16, 142, 
247,7,32,0,16,142,248,7,32,0 <1B9> 

32009 DATA 1 6 , 1 42 , 249 , 7 , 32 , , 16 , 1 42 , 250 ,7,32,0,16 
,142,251,7,32,0,16,142,252,7 <20B> 

32010 DAT A32, 0,16, 142, 253, 7, 32, 0,16, 142, 234, 7, 32 



,0,16, 142,255,7,96,32,0,16,142 <1B4> 

32011 DAT A39, 208,32,0, 16, 142, 40, 20B, 32,0, 16, 142, 
41,20B,32,0,16,142,42,20B,32 <5B> 

32012 DAT AB, 16, t 42, 43, 20B, 32,0, 16, 142,44,208,32, 

0, 16, 142, 45, 20B, 32, 0,1 6, 142, 46 <1B3> 

32013 DATA208, 76, 32, 0,16, 142, 37, 208, 32, 0,16, 142, 

38 , 208 , 96 , 32 , , 16 , 142 , 28 , 208 < 1 79> 

32014 DATA96, 173, 12, 4, 201, SB, 208, B, 169, 48, 141, 12 
,4,23B,11,4,173,11,4,201,5B,20B <130> 

32015 DATAB,169,4B,141 ,11,4,238,10,4,173,10,4,20 
1,58,208,8,169,48,141,10,4,238 <64> 

32016 DATA9, 4, 173, 7, 4,201,58,208,8, 169,46,141, 9, 
4,238,8,4,96, 173,3,21,24,107 <73> 

32017 DAT A0,2 1,141,3,21, 141, 1,212, 76, 49,234, 120, 
167,107,141,20,3,169,7,141,21 <167> 

32018 DATA3, 88, 76, 120, 169, 47, 141, 20, 3, 167, 234, 14 

1,21, 3, 88, 96, 32, 0,16,142, 34, 20B <206> 

32017 DATA32,0, 16,142,35,208,32,0,16,142,32,208, 
32,0,16,142,33,208,96,173,24 <242> 

32020 DATA20B,41,241,9,12,141 ,24,208,96,162,240, 
189,127,6,201,32,208,11,169,32 <20B> 

32021 DATA157, 127,6, 173,255,20, 157, 127,218,202,2 
08,235,96,32,0, 16, 142,255,20 <72> 

32022 DATA96, 32, 0,16, 142, 240, 20, 32, 0,16, 142, 241, 
20,32,0,16,142,242,20,32,0,16 <46> 

32023 DATA142, 243, 20, 32, 0,16, 142, 244, 20, 32, 0,16, 
142,245,20,32,0,16,142,246,20 <174> 

32024 DATA32, 0,16, 142, 248, 20, 32, 0,16, 142, 249, 20, 
32,0,16,142,250,20,32,0,16,142 <18> 
32825 DATA251 ,20,32,0, 16, 142,252,20,32,0, 16, 142, 
253,20,32,0,16,142,254,20,96 <204> 

32026 DATA120, 169, 78, 141, 20, 3, 169, 10, 141, 21 ,3, 16 
5,253,141,1B,20B, 173,17,208,41 <1> 

32027 DATA127,141,17,20B,167,127,141 ,26,20B,B8,9 
6,173,25,208,141,25,208,48,7 <4> 
3202B DATA173, 13, 220, SB, 76,49, 234, 174,239,20, 1B9 
,240,20,141,33,208,189,248,20 <30> 

32029 DATA141, 18, 208, 232, 224, 7, 208, 2, 162, 0,142, 2 
39,20,76,188,254,32,0,16,142 <B:>> 

32030 DATA110, 10,96, 173, 17,208,9, 16*141 ,17,208,9 

6, 173,1 7, 20B, 41, 239, 141 ,17,208 <120> 

32031 DATA96, 162,8, 189,247,7,221,31,21 ,20B,9,1H9 
,15,21 , 157,247,7,76,168,10,254 <2U > 

32032 DATA247,7,202, 138,208,232,96,32,0, 16, 142,1 
6,21,32,0,16,142,32,21,32,0,16 <2.> 

32033 DATA142, 17,21,32,0,16,142,33,21 ,32,0,16,14 
2,18,21 ,32,0,16,142,34,21,32 <166> 

32034 DATA0, 16, 142, 19, 21, 32, 0,16, 142, 35, 21 ,32,0, 
16,142,20,21,32,0,16,142,36,21 <22> 

32035 DATA32,0,16, 142,21 ,21 ,32,0, 16, 142,37,21,32 
,0,16,142,22,21,32,0,16,142,38 <101> 

32036 DAT A21, 32, 0,1 6, 142, 23, 21 ,32,0,16,142,39,21 
,76,169,0,141 ,239,20,76,167,224 <21> 

32037 DATA141, 2, 220, 173, 0,220, 41, 16, 208, 6, 169, 25 
5,141,2, 220 , 96 , 1 73 , 37 , 208 , 72 < 22B > 
3203B DATA173, 161 ,0,141 ,37 , 208, 104, 141 , 38,208 ( 17 
3,18,208,141 ,38,208,32,26, 192 <7> 
32037 DATA32 , , 1 94 , 32 , , 8 , 76 , 25 , 1 1 , 162 , 1 4 , 1 87 , 1 , 
208,125,255,19,157,1,208,202 <31> 

32040 DATA138, 208, 243, 96, 32, 0,16, 142, 0,20, 32, 0,1 
6,142,1,20,32,0,16,142,2,20,32 <184> 

32041 DAT A0, 16, 142, 3, 20, 32 ,0,16, 142, 4, 20, 32, 0,16 
,142,5,20,32,0,16,142,6,20,32 <187> 

32042 DAT A0, 16, 142, 7, 20, 32, 0,1 6, 142, 8, 20, 32, 0,16 
,142,7,20,32,0,16,142,10,20,32 <179> 

32043 DATA0,16,142,11 ,20,32,0, 16, 142, 12,20,32,0, 
16,142,13,20,32,0,16,142,14,20 <222> 

32044 DATA32, 0,16, 142, 15, 20, 76, 32, 0,16, 142, 0,22, 
32,0,16,142,1,22,32,0,16,142 <B3> 

32045 DATA2, 22, 32, 0,16, 142, 3, 22, 32, 0,16, 142, 4, 22 
,32,0,16,142,5,22,32,0,16,142 <153> 

32046 DATA6,22,32,0,16,142,7,22,32,0,16,142,B,22 
,32,0, 16, 142, ?V22, 32, 0,16, 142 > <B2> 

32047 DATA10, 22, 32, 0,16, 142, 11, 22, 32 ,8, 16, 142, 12 
,22,32,0,16,142,13,22,76,162 <159> 

32048 DATA14, 187,1,208,221 ,255,21 ,176,7,254,255, 
19,169,0,240,3,222,255,19,202 <I 10> 
32B49 DATA208, 235, 96, 162, 14, 189,255, 17,201 ,4,208 
,9,208, 7,222,255, 19, 16"9, 0,240 <51> 

32050 DATA12, 1B9.255, 19,201 , 251 ,208,5,208,3,254, 
255,19,202,208,225,96,169,224 <86> 

32051 DATAI41,2,220,173,0,220,41,1,20B,16,173,1, 
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208,201 ,51,144,9,173,1, 208, 36 <103> 

32052 DATA233, 3, 141, 1,208, 173, 0,228, 41, 2, 208, 16, 
173,1,208,201,224,176,9,173,1 <1> 

32053 DATA208.24, 105,3, 141 , 1 ,20B, 173,0,220,41 ,4, 
208,16,173,0,208,201,32,144,9 <105> 

32054 DA7A173, 8, 208,56, 233,3, 141, 0,208, 173, 0,220 
,41,8,208,16,173,0,208,201,240 <204> 

32055 DATfll76,9,173,0,28B,24,105,3,i41,8,208,173 

, 30, 20B, 141, 255, 21, 173, 255,21 <38> 

32056 DATA201,3,20B,12,23B,12,4,23a,2S,4,169,0,l 
41,2,0,96,173,255,21,41,1,240 <244> 
320E7 DATA243, 169, 15, 141, 2, 0,169,255,141, 2, 220, 9 
6,238,4,22,238,7,22,206,8,22 <112> 

32058 DATA206, 10, 22, 238, 13, 22, 238, 12, 22,206, 14, 2 

2, 238, 15, 22,9t, 169, 0,141, 255 <B> 

32059 DATA21 ,133,2,32,70,12,32,36,12,32,12,12,32 
,70,11,32,146,10,32,0,8,32,0 <2B9> 
371360 DATA8,32, 210, 12, 32, 54, 13, 32, 129, 13, 165, 2, 2 „ 
01,0,240,1,96,173,10,4,201,54 <161> 

32061 DATA144, 212, 173, 11, 4. 201, 54, 144, 205. 173, 12 

, 4, 201, 54, 144, 19B, 169, 0,133, 2 <1Ö7> 

32062 DATA169, 255,141, 2, 220, 96, 173, 255, 21 ,201, 3, 

20B, 15, 169, 65, 141, 4, 212, 173, 1B <163> 

32063 DATA20B, 141, 1,212, 169, 0,240, 11, 169, 64, 141, 
4,212, 173, 1B,20Q, 141 ,2,212, 173 <87> 

32064 DATA255, 21 ,41, 252, 240, 34, 169, 97, 141, 4,212, 

173, 18, 20B, 141, 0,212, 141, 3, 212 <107> 

32065 DATA169, 0,240, 16, 169, 64, 141, 4, 212, 173, IS, 2 
08,141,2,212,169,8,141,3,212 <66> 

32066 DATA96,173,28,4,201,58,20B,8,169,4a,141,2B 
,4,230,27,4,173,27,4,201,58,208 <232> 

32067 DATA8, 169, 48,141, 27, 4, 238, 26, 4, 173, 26, 4, 20 

1, 58, 208, 8, 169, 4B, 141, 26, 4, 238 <54> 

32068 DATA25,4,173,25,4,201,58,20B,B,169,48,141, 
25,4,238,24,4,32,48,9,96, 162 <67> 

32069 DATA14,I69,B,i57,255,19,202,20B,24B,96,169 
,0,133,247,133,249,133,178,169 <216> 

32070 DATA200,133,248,169,202,133,250,169,204,13 

3, 179, 169,32, 141 ,255,193, 141 <104> 

32071 DATA251, 193, 141, 247, 193, 169, 64, 141, 254, 193 
,141,250,193,141,246,193,96,120 <9> 

32072 DATA169, 234, 141, 21, 3, 169, 49, 141 ,20,3,88,96 
,206,81,206,8,22,206,10,22,238 <115> 

32073 DATA13, 22, 238, 12, 22, 206, 14, 22, 238, 15,22, 96 
,96,0,0,255,255,0,0,0,16,0,0 <246> 
32tu74 DATA0, 0, 0, 0, 0,0, 241,0, 206, Bl, 0,199, 0,0, 0,0 
,0,0,0,135,121,56,0,0,144,0,116 <175> 
32075 DATA30, 70, 0,0, 0,0, 0,0, 0,237, 0,0, 0,0,0,0,28 
5,6,0,0,0,0,0,0,199,4,0,0,0,0 <3S> 
320T6 DATA6, 6, 0,0, 0,0, 0,0, 4, 0,0, 0,0, 0,0, 0,0, 0,0, 
0,0,0,0,0,0,0,135,0,0,0,0,0,0 <43> 

32077 DATA0, 7, 66, 0,0, 0,0, 255, 249, 0,0, 0,0, 0,0, 0,2 
55,255,0,0,0,0,0,0,0,0, 12B,20B <102> 

32078 DATA0,0, 0,0, 0,0, 0,0, 8,0,0, 0,0,0, 0,0,0,0,0, 
0,0,0,0,0,0,0,0,0,0,0,0,33,0 <189> 

32079 DATA0, 0,0, 0,33, 0,0, 0,0, 0,0, 33, 0,0, 0,8, 0,0, 
B,16,0,0,0,0,0,0,255,0,0,t2B <227> 
320e0 DATA0, 0,0, 30, 0,0, 0,0, 0,0, 8, 0,0, 0,0, 0,0, 0,0 
,0,0,255,255,0,0,0,24,0,0,0,0 , <0> 

32081 DATA0, 0,0, 0,241,0, 206, Bl, 86,6,6, 255, 4, 6,0, 
215,199,0,0,8,0,0,0,223,134,0 <218> 

32082 DATA2, 199, 0,0, 6, 231, 0,0, 4, 199, 0,0, 0,259,0, 
0,0,0,0,0,0,0,0,0,0,0,0,0,0,199 <91> 
32BB3 DATAB, 0,0, 0,0, 0,0, 135, 57, 16, 0,0, 144, 0,1 16, 
30,70,0,0,0,0,0,0,0,237,0,0,0 <71> 
32B84 DATA0,0, 0,255, 6, 0,0, 0,0, 0,0, 199, 4, 0,0, 0,0, 
6,6,0,0,0,0,0,0,0,0,0,0,0,8,0 <172> 
32085 DATAB, 0,0, 0,0, 0,0, 0,0, 0,0, 135,0,0,0,0,0,0, 
0,7,66,8,0,0,0,255,241,0,0,0 <1Q0> 
320B6 DATA0.0, 0,0, 255, 255, 0,0,0,0, 0,0, 0,0, 128, 20 
8,0,0,0,0,0,0,0,0,0,0,0,0,0,0 <220> 

32087 DATA0,0,B,B, 0,0,0,0, 0,0, 0,0, 0,0, 0,0, 0,33, 8 
,0,0,0,0,161,0,0,0,0,0,0,33,0 <131> 

32088 DATAB, 0,0, 0,8, 0,16, 0,0,0, 8, 0,0, 255, 0,0, 128 
,0,0,0,38,0,0,0,0,0,0,0,0,0,0 <143> 

32089 DATA0.0, 0,0*0, 0,0, 255, 253, 0,0, 0,16, 0,0,0,0 
,0,0,0,0,241,0,206,81,32,253 <229> 

32090 DATA174,32,13B,IS3,96 <31> 

33000 SVS 35751 PR INT" CC4&5£>" <18> 

33001 T*-''C£P4Cf>*tSP4££.>PRESS{SMClJFIREt£e^C£> 
raC3£4^>STARTt£P^^J»CSP^t££*>eRUESSE{£PA££>AN« t 
^flCEJOTTI, FRANK, UWE, TOtmYtSP4C£38rC££4C£>RE8T," <136> 



330021 T*-T*+" WER, HELMUT {SP4C£>fc t SPACE i FETER , JOE 
RB , MARC , TAN JA {JMC£} * IS£A££}REST tS£4££J VON t S££C£ 

JFB{§F4CE>Ll " 

33003 T*-T*+"A(1IBA. . . . {gP^CETJAMIGA. . . . C SP4CCJ6 1 

0" 

33084 F0RX-1T0 LEN<T*> »PRINT "<££££&>" jMID* (T*,X, 

1>jPGKE 49152+253+X,PEEK<1024>iNEXT X 

40026 PE-PEEK ( 1 86 ) l A*«CHR* ( 34 > 

40027 PRINT" < CJL£>W WtffTg lBDOTINB. ■ . » 

4002B PRlNT*<DflW*2 S£fiDl>l-0AD H A*"DATABt££<4££>II* 
A*","|PE 

48029 PRINT"{ PgKfrp RUN"i 1F PEEK<2>-1 THEN PRINT- 
RUN" 

40030 PRINT , 'C P0WH2 >LQAD"A<"WAIH'A*"."|PE 

40031 PRINT" t PPHH4 >RUN"i IF PEEK(2>«1 THEN PRINT" 
RUN" 

40032 PRINT" CHOffEi ">FOR X-631 TO 636iPOKE X,13»N 
EXT XiPDKE 198,6 

ENDE DES LISTINGS 



C-64 LISTING + CHECKSUMHEN (C V1.0) 

10 FÜR X=51712 TO 52066tREAD DTtPOKE X,DTiNEXT X 

20 DATA 4,226,24,5,65,9,196,36,5,65 

40 DATA 4,226,24,5,65,4,226,24,5,65 

60 DATA 4,226,24,5,65,9,196,12,5,65 

80 DATA 4,226,24,5,65,4,226,24,5,65 

180 DATA 6,133,24,5,65,13,10,36,5,65 

120 DATA 6,133,24,5,65,7,81,24,5,65 

148 DATA 7, Bl, 24, 5, 65, 14, 162, 12,5,63 

160 DATA 7,81,12,5,65,7,81,12,5,65 

180 DATA 7,81,24,5,65,4,90,24,5,65 

200 DATA 8,180,36,5,65,4,90,24,5,63 

220 DATA 4,90,24,5,65,4,90,24,5,65 

240 DATA 8, 1B0, 12,5,65,4,90,24,5,65 

268 DATA 4,90,24,5,65,6,133,24,5,65^ 

280 DATA 13,10,36,5,65,6,133,24,5,65* 

300 DATA 6,133,24,5,65,6,133,24,5,65 

320 DATA 13,10,12,3,65,6,133,12,5,63 

340 DATA 6,133,12,5,65,6,133,12,5,65 

360 DATA 6,133,12,5,63,4,226,24,5,63 

380 DATA 9,196,36,5,65,4,226,24,5,65 

400 DATA 4,226,24,5,65,4,226,24,5,65 

420 DATA 9,196,12,5,65,4,226,24,5,65 

440 DATA 4,226,24,5,65,7,81,24,5,65 

460 DATA 14, 162, 36, 5, 65, 7, Bl, 24, 3,65 

480 DATA 7,81,24,5,65,7,81,24,5,65 

500 DATA 14, 162, 12, 5, 65, 7, Bl, 12, 5,65 

320 DATA 7,81,12,5,65,7,81,12,5,65 

340 DATA 7,81,12,5,65,4,226,24,5,65 

560 DATA 9,196,36,3,63,4,226,24,3,65 

580 DATA 4,226,24,5,65,4,226,24,3,63 

600 DATA 9,196,12,5,65,4,226,24,3,65 

620 DATA 4,226,24,5,65,6,133,24,5,63 

648 DATA 13,10,36,5,65,6,133,24,5,65 

660 DATA 7,81,24,5,65,7,81,24,5,65 

680 DATA 14,162,12,5,65,7,81,12,5,65 

700 DATA 7,81,12,3,63,7,81,24,5,65,0,0,0,0,8 

730 FOR X-51200 TO 51424iREAD DTiFDKE X,DTtNEXT 

X 

740 DATA 8,180,48,4,65 

750 DATA 14,162,48,4,65 

760 DATA 8,180,24,4,65 

770 DATA 14,162,24,4,65 

780 DATA 13,10,24,4,65 

790 DATA 12,78,24,4,65 

800 DATA 9,55,48,4,65 

810 DATA 16,109,48,4,65 

820 DATA 10,247,24,4,65 

830 DATA 18,112,24,4,65 

B40 DATA 16,109,24,4,65 

850 DATA 14,162,24,4,65 

860 DATA 8,180,48,4,65 

870 DATA 14, 162, 4B, 4,65 

BSB DATA 8,180,48,4,65. 

89B DATA 14,162,48,4,65 

9BB DATA 8,180,48,4,65 

910 DATA 13,10,48,4,65 

920 DATA 8,180,24,4,65 

930 DATA 13,10,24,4,65 



<29> 

<23> 

<174> 

<14> 

<56> 

<63> 

<66> 
<67> 

<6B> 

<148> 



<1B3> 

<22B> 

<241> 

<132> 

<25> 

<1B0> 

<251> 

<249> 

<164> 

<223> 

<63> 

<0> 

<51> 

<72> 

<173> 

<206> 

<95> 

<152> 

<11> 

<137> 

<90> 

<125> 

<73> 

<217> 

<58> 

<131> 

<14> 

<107> 

<62> 

<15> 

<50> 

<2B> 

<24> 

<239> 

<56> 

<164> 

<41> 

<205> 

<187> 

<173> 

<150> 

<146> 

<231> 

<92> 

<11> 

<216> 

<192> 

<239> 

<230> 

<70> 

<52> 

<9B> 

<72> 

<110> 

<72> 

<78> 

<40> 
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940 DATO 8,198,24,4,65 <<?B> 

950 DATA 13,10,24,4,65 < 6B > 

960 DATA 8, 180, 4B, 4, 65 <17B> 

970 DATA 12, 78, 48,4,65 <207> 

980 DATA 8,180,48,4,65 <190> 

990 DATA 12,78,48,4,65 <227> 

1000 DATA 8,180,48,4,65 <218> 

1010 DATA 13,10,48,4,65 <172> 

1020 DATA 8,180,24,4,65 <17B> 

1830 DATA 13,10,24,4,65 <141> 

1040 DATA 9,196,24,4,65 <242> 

1050 DATA 14,162,24,4,65 <175> 

1060 DATA 8,180,48,4,65 <15> 

1070 DATA 14,162,48,4,65 <253> 

1080 DATA 8,180,24,4,65 <239> 

1090 DATA 14,162,24,4,65 <215> 

1100 DATA 13,10,24,4,63 <211> 

1118 DATA 12,78,24,4*65 <40> 

1128 DATA 8,55,48,4,65 <157> 

1130 DATH 16,109,48,4,65 <76> 

1140 DATA 10,247,24,4,65 <25> 

1158 DATO 18,112,24,4,65 <l> 

1160 DATA 16,107,24,4,65 <48> 

1178 DATA 14,162,24,4,65 <39> 

1628 DATA 0,0,0,0,0 , <157> 

1630 FÜR X=52224 TO 5228S;READ DT:PGKE X,DTiNEXT 

X <93> 

1640 DATA 8,180,24,5,65,17,103,12,2,129,8,180,12 
,5,65 <165> 

1670 DATA 8,180,24,5,65,34,207,24,3,129,8,198,24 
,5,65 <236> 

1700 DATA 17,103,12,2,129,8,180,12,5,65,8,180,12 
,5,65 <73> 

1730 DATA 34,207,12,3,129,8,188,12,5,65,34,207,1 
2,3,129,0,0,0,0,0 <16> 

1780 FOR X =49664 TO 50727: READ DTsPOKE X,DTsNEXT 

X <16> 

1790 DATA173, 255, 193, 205, 254, 193, 208,56, 169, 0,14 
1 ,255, 193, 141 ,4,212,32,67, 194 <17S> 

1800 DATA141 ,2,207,201 ,0,208, 14, 169,200, 133,248, 
169,0,133,247,32,67,194,141 <B&> 

1810 DATA2, 207, 32, 67, 194, 141, 1,207, 32, 67, 194, 141 
,254,193,32,67,194,141,252,193 <179> 

1820 DATA32, 67, 194, 141, 5, 207, 76, 84, 194, 160, 0,177 
,247,170,230,247,165,247,201 < 123> 

1830 DATA0, 208, 2, 230, 248, 138, 96, 173, 251, 193, 205, 
250,193,208,56,169,0,141,251 <28> 

1840 DATA193,t41,ll ,212,32,154,194,141,9,207,201 
,0,208,14,169,282,133,250,169 <195> 

1850 DATA0, 133,249,32, 154, 194, 141 ,9,207, 32, 154, 1 
94,141,8,207,32,154,194,141 <130> 

1860 DATA250, 193, 32, 154, 194, 141, 248, 193, 32, 154,1 
94,141,12,207,238,251,193,76 <16> 

1870 DATA171, 194, 168, 8, 177, 249, 170, 230, 249, 165, 2 
49,201,0,208,2,230,258,138,96 <164> 

1880 DATA238,2S5, 193, 173,247, 193,205,246, 193, 20B 
,56,169,0,141,247,193,141,18 <54> 

1890 DATA2i2,32,241 , 1 94, 141 , 16,207,201 ,0,208, 14, 
169,204, 133, 179, 169,0, 133, 178 < 155> 

1908 DATA32, 241, 194, 141, 16, 207, 32, 241, 194, 141, 15 
,207,32,241,194,141,246,193 <108> 

1910 DATA32,241 ,194, 141 ,244, 193,32,241 , 194,141 , 1 
9,207,76,2,195,160,0,177,178 <24> 

1920 DATA170,230,178,165, 178,201,0,208,2,230,179 
,138,96,233,247,193,162,23,189 <21S> 

1930 DATA0,207, 157, 255,21 1,202,208,247,173,252,1 
93,201,1,208,29,169,8,141,6 <213> 

1940 DATA207, 173,255,193,201,2, 176,8,169,1,141 ,3 
,207,141,4,207,173,3,207,24 <141> 

1950 DATAI05,4, 141 ,3,207, 173,248, 193,201 , 1 ,208,2 
9,169,10,141,13,207,173,251 <185> 

1968 DATA! 93, 201, 2, 176, 8, 169, 4 ,141, 10, 287, 141, 11 
,207,173, 10,207,24,105,4,141 <1S2> 

1978 DATA10,207 , 173,244, 193,201 , 1 ,208,29, 169, Iß, 
141 ,28,207,173,247,193,281,2 <3> 

19B0 DATA 176, 8, 169,2, 141 ,17,207, 141 ,18,207, 173,1 
7,207,24,105,4,141 ,17,207,230 <281> 

1990 DATA253, 193, 23B, 249, 193, 23B, 245, 193, 173,252 
,193,201.2, 283, 20, 173, 253, 193 <76> 

2008 DATA4I , 1 ,208, 13, 169,49, 141 , 1 ,212, 141 ,0,212, 
169,9, 141 ,6,207,173,248,193 <S1> 

2018 DATA28S, 2, 208, 28, 173, 249, 193, 41, 1,208, 13, 16 



9, 0,141, 7, 217, 14 1,8,212,. 169 < 197> 

2020 DATA9, 141, 13, 207, 173, 244, 193, 201,2,208, 20,1 
73,245, 193,41 , 1 ,208, 13, 169,48 <40> 

2830 DATA141, 17, 212, 141, 15,212, 169, 8, 141, 28, 207, 
173,252,193,201,3,208,74,169 <7?> 

2040 DATA10, 141 ,6,207, 173, 255, 193,201 , 2 , 176, 13, 1 
69,6,141,4,207,141,3,207,169 <93> 

2050 DATA4, 141, 253, 193, 173, 253, 193, 41, a, 208, 28,1 
73,1,207,56,233,16,141,1,207 <4£> 

2060 DATA176, 3, 286, 2, 207, 173, 3, 207, 24, 105, 64, 141 
,3,207,144,3,238,4,207,173,1 <139> 

2070 DATA207,24,105,a, 141 , t ,287, 144,3, 23B, 2, 287, 
173, 252, 193, 201, 'S, 288, 44, 169 <227> 

2080 DATA10, 141, 6, 787, 173, 255, 193, 201, 4, 176, 15,1 
69,129,141,4,212,169,1,141,3 < 3 > 

2098 DATA207,169,4,141,4,287,173,lB,20a,41,63,24 
,109,3,207,141,3,207,144,3,238 <160> 

2100 DATA4, 207, 173, 244, 193, 201 ,3, 208,8, 169, 5, 141 
,20,207,141 ,21,207.173,752,193 < 151 > 

2110 DATA201, 5, 208, 4t ,173,255,193,201,32,176,7,2 
06,4,207,169,8,240,19,173,1 <86> 

2120 DATA207, 56, 233, 4, 14 1,1, 207, 176,3,20^, 2, 207, 
169,8,141,4,207,169,11,141 ,6 <55> 

2130 DATA207, 238, 3, 207, 173, 252, 193, 281, 6, 208, 30, 
173,255,193,41,4,280,14,173 <142> 

2148 DATA1 ,287,74^141,0,212,173,2,287,74,141,1,2 
12,173,3,207,24,105,16,141,2 <226> 

2158 DATA212, 173, 252, 193, 281, 7, 288, 23, 173, 255, 19 
3,41, 1,288, 10, 173, 2, 207, 56, 237 <2> 

2160 DATA255,193, 141,1,217,173,18,208,141,2,212, 
373,252,193,201 ,8,208,43, 1?3 <243> 

2178 DATA255, 193, 281, 2, 176, 16, 173, 2, 207, 56, 141 ,2 
43,193,233,16,141,2,207,169 <5> 

2188 DATAß, 240, 11, 173, 2, 207, 205, 243, 193, 240, 3, 23 
8,2,207,173,4,207,24,105,1,141 <24> 

2198 DA TA4, 207, 173, 252, 193, 201, 9, 208, 44, 173, 255, 
193,281,2,176,13,169,64,141 <52> 

2208 DATA4, 212, 169,0, 141 ,3,207,141,4,207,173,3,2 
07,24,105,16,141,3,207,144-3 <96> 

2218 DATA238, 4, 207, 169, 10, 141 ,6, 28V, 169, 0,141, 7, 
207,173,248,193,201,3,288,17 <208> 

2228 DATA169, 9, 141, 13, 287, 141, 14, 207, 173, 9, 207, 5 
6,233,64,141,9,287,173,248,193 <H6> 

2230 DATA20I, 4, 208, 64, 169, 8, 141, 13, 287, 169, 136,1 
41,14,207-, 173,249,193,41,4,208 <179> 

2240 DATA29, 173,8,207, 10, 141 ,8,207, 173,9,207, 10, 
141 ,9,207,16,31,173,8,207,9 <204> 

2250 DATA128, 141 ,8,207, 169,0,240, 19,173,9,207,74 
,141,9,287,173,8,207,74,141 <23B> 

2268 DATA8, 207, 144, 3, 238,9,207,173, 251, 193, 281, 2 
,176,5,169,2,141,249,193,173 <23B> 

2270 DATA244, 193,201 ,3, 20B, 28, 173,245, 173,41 ,1,2 
08,5,169,17,141 ,18,212,169,8 <l-^4> 

2280 DATA141, 20, 207, 141, 21, 207, 173, 248, 193, 201, 5 
,288,42,169,9,141,13,207,141 <96> 

2290 DATA14, 207, 173, 25!, 193, 201, 7, 176, 13, 169, 3,1 
41,10,207,141,11,287,169,33 <120> 

2300 DATA141, 11,212,173,10,207,24,105,32,141,10, 
207,144,3,238,11,287,173,244 <55> 

2310 DATA193,2B1 ,5,208,48, 169,8, 141 ,20,207, 141 ,2 
1,207,141,17,287,141,18,287 <191> 

2328 DATA! 73, 247, 193, 201, 5, 176, 5, 169, 129, 141, 18, 
212,173, 15,207,56,233,96,141 <124> 

233?) DATA15, 207, 176, 3, 206, 16,207,96 <49> 

ENDE DES LISTINGS 




C-64 LIST1NB + CHECKSUMMEN IC V1.0) 

10 SYS 2430: SYS 2455, 13,5,0,01 POKE53270 ,FEEK (532 

70> 0R16:P0KE: 54296, 15i SY33532 <144> 

11 FÜR X~0 TO 7:PGp<E 2024+X ,48s NEXT X <174> 
28 PHIMT" 18R0MK CL£AR >" aSVS 2345,255) SVS 2234,14 

3, 144, 145,146, 147, 148, 149, i50:BVS 3521 <17> 

30 SYS 2283, 12, 12, 12, 12,1.2, 12, 12, 12;SYS 2332,11, 
iSiFOKE 53278, SSiPOKE ^49258,96 <164> 

40 SYS 2125,04,80, 137,80, 188^80, 22B„8B, 84, 138, 13 
2,130,180,130,228,130,0 <121> 

50 X-=INT<8*RNDa>+i) : Y^INT (3*RND ( 1 J +1 ) tSYS 2697s 
PDKE 53271, 255 sPOKE 53277,255 <4F\ 

6» ON X GQSUB 5008(8,30010,58020,50038,50840,5805 



Com 



pa««^ 



8,58060,50078 <20> 

70 ON V GOSUB 510018,52000,536100,51000,53080 <1B7> 

80 SYS 3532: RU=11B: FOR X=1624 TG 1663s Z=INT (2*RN 

D(1));IF PEEK<X)<>32 THEN HB <212> 

90 IF Z=0 AND RU<120 THEN RU=RU+ 1 l POKE X.RU+BuPO 

KE 54 272+ X,PEEK< 55936 > : GOTO 110 <243> 

100 IF Z="l AND RUM 15 THEN RU-RU-lsPOKE X.RUjPDK 

E 54272+X, PEEK (55936) i GGTO 110 <22> 

105 IF Z THEN POKE K,RU+G:POK£ 54272+X ,PEEK<5593 

6): GOTO IIB <97> 

106 POKE X,RU:PDKE 54272+X , PEEK (55936) <53> 
110 NEXT X:GDSUB 25000 <5B> 
1 i ! FORX=55296TO55335STEP4sP0KEX ,5« PGKEX+1 , 5: POK 
EX+2,7:POKEX+3,7iNEXT X <A5> 
120 SYS 26SS.P0KE 53269,255t SYS 2B38lSVS 2607 <44> 
130 SYS 2B36:P0KE 53269,0 <196> 
140 PÜKE 54277, 1 i :P0KE5427G ,0: SYS 21 12,45,7s POKE 

54276,1 7: SYS2069sPRINT" CBflöWW CLEA Rl" <16B> 

150 POKE 54276,01 LE=liLI=5iSYS 2234, 157, 161 , 12B, 
132, 134, 13B, 151, 134 <37> 

160 SYS 2733,157,160,161,164,128,131,132,133,134 
,137,138,142,151,153,154,156 <203> 

170 DN LE GGSUB 20008,20100,20508,20300,20400,20 
200,20600,20700 <252> 

1G0 PRlNT"CCL£4fi}'*tSYB 2697 <221> 

190 X=INT<B*RND(l)+l>tY=INT(3*RND(lMi> JSYS 2697 
tPDKE 53271, 255: POKE 53277,255 < 180> 

200 ON X GGSUB 50008,50010,50020,50030,58040,580 
50,50060,50070 <160> 

210 DN Y BOSUB 51808,52000,53000,54080,55080 <71> 
220 RU=ltBsFOR X=1624 TG 1663: Z=INT (2*RND( 1) ) : IF 

PEEK(XK>32 THEN 270 <9B> 

230 IF Z=0ANDRU<120 THEN RU=RU+1:P0KE X,RU+B(PGK 
E 542 72+ X,PEEK( 55936 >: GOTO 270 <213> 

240 IF Z*l AND RUM15 THEN RU=RU-1:FÜKE X,RUiPOK 
E 54272+X, PEEK (55936): GGTO 278 <234> 

250 IF Z THEN POKE X,RU+BePOKE 54272+X , PEEK (5593 
6).'GOTD 270 <209> 

260 POKE X,RU:PGKE 54272+X, PEEK (55936) <20B> 

270 NEXT X:SYS 2283, 12, 12, 12, 12, 12, 12, 12, 12*5Y5 
2332,11,15 <12B> 

288 PDKE 53271, 0:FDKE 53277, BsSYS 2607lSY5 Z6B8* 
POKE 54277, 192; POKE 5427B,250 <15> 

2B5 POKE 54276, 0: FGRX«1T0LI :P0KE1858+X , 112t POKE 
X+55338,9:NEXT X <87> 

290 GOSUB 25080t PRI NT "iUHJT£_ HOME R I G H T >EHER8Y i l 
SJMCE2 3 008 t SP,flCE4 } SCORE: {S PACE 3 008000" ; POKE 5327 
8,8s SYS 2687 ~" <214> 

295 FOR X-0 TO SiPOKE 1 B4B+X, PEEK (2824+X) ! NEXT X 
«SYS 3307 <112> 

300 IF PEEK (2) =15 THEN 1888 <253> 

310 POKE 54277, 12sP0KE 5427B, BsSYS. 2112,33,6iPOK 
E 54276,171 SYS 2069;POKE54276,0 <1> 

320 LE=LE+1>F0R X=0 TO 5s POKE 2024+X , PEEK U848+X 
JsNEXT XsGDTQ 170 <11B> 

999 END <1BA> 

1080 REH TOT <95> 

1020 POKE 54276, 0:POKE 54276,21 »FGRX=BTO180: POKE 
54273, X:PDKE54287,X*2 <161> 

1330 PGKE53285,X:P0KE53286,25S-XsNEXTX <70> 

1035 Ll=LI-lsIF LI=8 THEN 2B00 <47> 

1036 FOR X=0 TO 5sPOKE 2024+X , PEEK i 184B+X> S NEXT 

X <*> 

1048 POKE 54276, 2BEG0T0 170 <34> 

2000 PR I NT "t tf DHE RI0HTJ4 DQUH6 SPACE 115" <69> 

2018 PRINTTAB ( 14) " {SP>!CE?BfiME< SP/lCE >QVER{ SP/ICE 3 " <252> 
2020 PR INTTAB < 14) " < SPACE11 > " <17B> 

2(530 PGKE54277,i2;P0KE 5427B,0:SYS 21 12 , 1 33,6sP0 
KE54276,33sSYS 2069: PDKE54276 ,0 <122> 

2(340 FOR WT=0 TD 500: NEXT WTsRUN <209> 

19999 END <237> 

20000 REM *** LEVEL 1 <169> 

20001 SYS 2125,166,68,166,208,140,28(3,180,208,18 
0,100,100,180,18,180,100,100, 11 <236> 

20002 SYS 2999, 166, laß, 166, 200, 166, 180, 0,8, 8, 0,8 
,8,8,0 <73> 
28CT83 RETURN <255> 
20100 REM *** LEVEL 2 <23> 
20181 SYS 2125, 166, 60, 166, 200, 140, 208, 1B0, 200, 18 
0,100,100,100,10,100,180,100,15 <104> 
20102 SYS 2999, 166, 188,166, 288, 166, 180,8,8,0, 8, 
,0,8,8 <173> 



78103 RETURN <99> 

28288 REM *** LEVEL 3 <133> 
28201 SYS 2125,166,60,166,150,140,208,180,288,10 

0,100,100,100, 18,180,108,100,31 <139> 
20202 SYS 2999,166,168,166,200,155,120,0,150,8,0 

,0,0,0,0 <43> 

28283 RETURN <199> 

28300 REM *** LEVEL 4 <244> 

28301 SYS 2125,166,68,166,150,140,200,168,288,10 
0,108, 108, 188,1«, 180, 180,100,63 <75> 
20302 SYS 2999,166,160,166,210,155,108,0,150,128 
,130,0,8,0,0 <?2> 
28303 RETURN <44> 
28408 REM *** LEVEL 5 <98> 
28481 SYS 2125,166,68,166,158,148,288,168,88,88, 

100, 100, 108, 10, 100, 100, 100, 195 <35> 
20102 SYS 2999,166,160,166,210,155,180,0,150,128 

,130,0,8,0,0 <192> 

20483 RETURN <144> 

20508 REM *** LEVEL 6 <289> 
20581 SYS 2125,166, 68, 166, 150, 148, 280, 1B0, 88, B0, 

50,58,100,18,100, 108,108,143 <95> 

20502 SYS 2999,166,160,166,210,155,108,0,158,128 
,138,0,0,0,8 <37> 

20503 RETURN <245> 

20600 REM *** LEVEL 7 <63> 

20601 SYS 2125,166,68,166,158,148,288,198,38,38, 
70,70,100,60,100,160,100,127 <22B> 
28602 SYS 2999,166,168,166,218,155,180,8,158,128 
,130,33,120,40,68 <19B> 
20603 RETURN <B9> 
28708 REM *** LEVEL 8 UND WEITERE <1B1> 

20701 SYS 2125,166,60,166,158,148,200,130,38,38, 
70,70,180,28,130,130,118,255 <51> 

20702 SYS 2999,206,160,166,118,125,100,0,58,18,1 
70,33,28,70,60 <66> 

20703 RETURN <1S9> 
25808 REM BRAFIKEN ADDIEREN <14B> 
25018 FOR WO-1 TG 10 <155> 
25020 SP=INT<1864+2B0*RNDa) ) 3 W=INT (4*RND* 1 ) +1 > <58> 
25830 ON W GOSUB 26808,27888,26808,29008 <51> 
25048 NEXT WO <78> 
25850 RETURN <Z81> 
26000 REM GRAFIK I <H7> 
26010 IF PEEK (SP) =32 THEN POKE SP, 81 i PDKE 5P+342 

72,9 "<B7> 

26028 IF PEEK (SP+1 > ^32 THEN POKE SP+1,B2«PDKE SP 

+54273,9 <121> 
26030 IF PEEK(SP+2>-32 THEN PDKE SP+2,83sPQKE SP 

+54274,9 <2B5> 
26040 IF PEEK(SP+3)=32 THEN PDKE SP+3,84sP0KE SP 

+54275,9 <33> 

26050 RETURN <1S1> 

27000 REM GRAFIK II <242> 
27810 IF PEEK (SP) ="32 THEN POKE SP.BllPOKE SP+542 

72,9 <67> 
27828 IF PEEK (SP+1) =32 THEN PDKE SP+l,83sP0K£ SP 

+54273,9 <121> 
27030 IF PEEK(SP+2>*=32 THEN PDKE SP+2,84:POKE SP 

+54274,9 <205> 

27058 RETURN <16I> 

28008 REM GRAFIK III <1Ö4> 
28010 IF PEEK(SP)-32 THEN POKE SP,S2sP0KE SP+542 

72,9 <63> 
2S020 IF PEEK(SP+i>=32 THEN POKE SP+1 ,B3s POKE SP 

+54273,9 <181> 
28030 IF PEEK(SP+2S=32 THEN POKE 5P+2 ,84s POKE SP 

+54274,9 <185> 

2B05B RETURN <141> 

29098 REM GRAFIK IV <63> 
29010 IF PEEK (SP) =32 THEN POKE SP,BlsPOKE SP+542 

72,9 <27> 
29020 IF PEEK(SP+1>=32 THEN POKE SP+I,B4tP0KE BP 

+54273,9 <J81> 

29050 RETURN <121> 

50000 SYS 2455,7,B,8,8tSYS 2515,2 <1B1> 

50001 SYS 2522,2,8,11,12,15,7,1,10,160,165,169,1 
72,174, 176; RETURN . <19> 
50010 SYS 2455,13,*5,ffl,0:SYS 2515,2 <46> 
50811 SYB 2522,2,6,5,13,7,8,2,18,168,165,169,174 

, 176, 179s RETURN <202> 

50028 SYS 2455, 14, 6, 0,8t SYB 2515,7 <184> 
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50021 SYS 2522,7,9,2,4,8,7,1,10,160,165,169,172, 

173, 175: RETURN 

50030 SYS 2455,I0,2,0,0=SVS 2515,5 

5B031 SYS 2522,5,11,12,15,7,1,13,10,160,165,167, 

171, 173 ,175: RETURN 

50040 SYS 2455, 15,11,0,8: SYS 2515,3 

50041 SYS 2522,3,6,14,5,13,7,1,10,160,165,169,17 
1,173, 175sRETURN 

50050 SYS 2455,4,9,0,01 SYS 2515,3 

50051 SYS 2522,3,13,5,6,14,15,1,10,160,165,169,1 
7 1,1 73, 175s RETURN 

50060 SYS 2455,9,0,0,0sSYS 2515,7 

50061 SYS 2522,7,0,9,2,4,8,1,10,161,166,169,171, 
173, 175: RETURN 

50070 SYS 2455,11,0,0,0:SYS 2515,6 

50071 SYS 2522,6,0,11,12,15,1,14,10,160,166,169, 
17i,173,175:RETURN 

50999 REM SCENARIOS 

51000 PRINTTAB ( 19) " I BROH N SM}" 
51010 PRINTTAB (17) "CSK SL CD SH SO> " 

51020 PRINTTABUS) "{g/C SL_ CH CQ SP CZ CS SN SO J " 
51030 PRINTTAB (13) " CSK SL CH CQ SP SU SV SN SP C 

z es sn sa>" 

51010 PRINTTAB (11) "{SK S£ CN CQ SP3 SX SV SZ SP3 
CZ CS SH_ SO}" 

51050 PRINTTAB (09) " fSK SL CN CQ SP 13 CZ CS SH SO 

. } „ 

51060 PRINTTAB (07) "{§K SL CN CQ C- S\ C- SV C- S 
iCzSiCzSifcSiCzSiC^Sl. Qzi GZ GS SN SO}" 
51070 PRINTTAB (05) " {SK S£ CN CQ CH. Q& SP 17 CZ CS 

Cg_ CS SN soy" 
510S0 PRINTTAB (0S>"{S4- SP CA CP CA CP m CA CP CA C 
g QA CP CA C£_ CA_ CP CA CP CA CP CA CP CA CP CA C 
€. QA SB SC} 

51090 PR 1 NTTAB < 07 ) " < SD4 SPACE 17 SP4 >" 
51100 PRINTTAB (07) " i SD4 SPACE1 7 SP4> " 
51110 PRINTTAB (07) " ISD4 SPACE 17 SD4}" 
51120 PRINTTAB (07) " < SP4 SPACE 17 SD4>" 
51130 PRINTTAB (07> " iSD4 SPACE17 SP4>" 
51140 PRINTTAB (07) " < SD4 SPACE 17 SD±y 
51350 PRINTTAB(07>"{ SPf SPACE 17 SP4 >" 
51160 PRINTTflB (07) " ISD4 SPACE 17 SD4 3 " 
51170 F-RINTTAB(06> "CSE SF. SPS SG SPACE IS SE SF S 
P3 $ßJ" - ~ -_ 

3il88-PRINTTAB(04) " {SH $129 SJ > " 
51190 PRINTTAB (03) "{SW SI 31 SJ>" 
51200 PRINTTAB (01) " {SH SI35 S J > " 
51210 PRINT" <S-0 SHIFTSPACE S-16- CG S-ll } '• 
51215 SYS 2491 

51 220 PRINT" C(/P> ■*■**■ iru-irir «y{m *vieirif#TfTr ■*■■*■*>■*■ *■**■*** 
{CG } ifif Wir* rr «■* if " : POKE 1 983 , PEEK ( 1 982 > 
51230 FÜRX= 1 984TO2023 : POKEX , 80 : PGKEX+54272 , 9 : NEX 
T X:POKE 1993,99sPOKE 2014,103 

51240 POKE 56265, 9s POKE 56286, 9t POKE 56255,9«POK 
E 56215,9 
51250 RETURN 
52000 PRINT 

52010 PRINTTAB (7) " ZBßQHH_ SM > " ; TAB (31 ) "fSH>" 
52020 PRINTTAB (S)"{SK SL S± SN SO} "; TAB (29) " t$K 
S( St S« SOI" 

52030 PRINTTAB (5) "CSO SÜ SV SH SD} "; TAB(29) " {SD 
Sü S£ S# SP>" 

52040 PRINTTAB (5>"fSg SX S/ SZ SPJ "; TAB (29) " tSD 
SX SV SZ SD}" 
52050 PRINTTAB (5) 
2 SB SC}" 
52060 PRINTTAB (6) 
52070 PRINTTAB (6) 
CE8 SP3 I " 

52080 PRINTTAB C6> " { SP3 SPACE6 SK SL CH CQ SP CZ 
CS SJ£ SO SPACE6 SP3> " 
52090 PRINTTAB(6>"{SP3 SPACE4 SK SL CN CQ SP2 Cft 

S,°2 « CS Sl SO SPACE4 SD31 " 
52100 PRINTTAB(6)"{ SP3 SPACE2 SK SL CN CQ SP9 CZ 

CS SH SO SPACE2 SP3 > " 
52110 PRINTTAB (6) "{§03 SK St M fl SP13 £2 CS SN 

SO S51>" 
52120 PRINTTAB(6>"{SD3 S<° CV CP C>) CP CA CP CA C 
^CACILQAQILQAQJLQAQRCACJiCXSfl SDSi" 

52130 PRINTTAB (6>"<SÖ3 SB_ SC SPACE 17 SA SP SP3 1 " 
52140 PRINTTAB (6) "tSDj* SPACE19 SÜ4 ^ " 
52150 PRINTTAB (6) "{SD4 SPACE 19 SD4 > " 



'CS/I SP2 SB SCJ "(TAB (29) " CS^J SP 

't SP 3 SP4C£jf g Srt SP ACE 1» SP3 >" 
'< SP3 SPACES SK, SL CD SH. SO SPA 



<126> 
<7B> 

<57> 
<33> 

<234> 

<240> 

<17> 
<32> 

<120> 

<iza> 

<69> 

<167> 

<155> 

,<114> 

<238> 

<36> 

<25> 

<241> 

<23> 

<239> 

<B3> 

<61> 

<71> 

<81> 

<91> 

<101> 

<111> 

<121> 

<I31> 

<5> 

<47> 

<240> 

<213> 

<2B> 

<7B> 

<144> 

<160> 

<63> 
<136> 
<132> 
<242> 

<247> 

<101> 

<107> 

<113> 
<87> 

<84> 

<176> 

<216> 

<116> 

<2I4> 

<17> 
<98> 
<40> " 
<50> 



52160 PRINTTAB (6) "{SP4 SPACE 19 SD41 " 

52170 PRINTTAB(6)"{SP£ SPACE? C£ SPACE? SW}" 

52180 PRINTTAB (6) " J SD4 SPACES SA SB SC. SPACE9 SD 

£} '• 

52190 PRINTTAB (6) »{ SP* SPACE? SD SPACE? S£M>" 

52200 PRINTTAB (4 > " {S« SI29 SJ>" 

52210 PRTNTTAB(l)"{Stf SX35 S J> " 

52220 PRINT" C S-ll SHIFTSPACE S-JS CO S~l l>" 

52230 PR1UT" v**-x* hv*x*ICK1 *Tr***i(TrvTri(** **#Tf-if'rf<.CGy x 

■tfir-ir'M'-ir-Tririr-ir" 

52240 PRINT" {SP?, CT SP 19 Ctf SP9 UPS > " 

52245 POKE 2023,80:POKE 1983,94:P0KE 1943,93!SYS 

2491s PDKE 56215,9s POKE 56255,9 
52250 RETURN 
SB IFP 
53000 PRINT 

53010 PRINT" I BROHN SPACE SPS S PACE 27 SOS SPACE ! " 
53020 PRINT "C SP4CC SPS SPACE SD± SP ACE 17 SD 4 SPA 
CE SV5 SPACE}" 

53030 PRINT" ISPACE SD5 SPACE SD4 SPACE SP3 SP>1CE 
2. SP3 SPACE SD4 SPACE SD5 SP4C E>" 
53040 PRINT" {SPACE SR5 SPACE S D4 SPACE SD3 SPACE 

SD2 SPACE3 SD2 SPACE SD3 SPACE SD4 SPACE $05 SP 
ACE > " 
53050 PRINT" ISPACE SD5 SPAC E SD4 , SPACE SD3 SPACE 

SD2 SPACE SD SPACE SD2 SPACE SD3 SPACE SD4 ßPJjQ. 
C SP? SPACE}" 
53060 PRINT" I SP/tCC SPS SPACE SD4 SPACE SD3 SPACE 

SD2 SPACE. SD SPACE SD2 SPACE SD3 SPACE SD 4 SPAC 
E_ SPS SPACE}" 
53070 PRINT "{SPACE S$5 SPACE SD4 SPACE SD3 SPACE 

SD2 SPACE SD SPACE JD2 SPACE SPJ SPACE SD4 SPAC 
E SD5_ SPACE}" 
530B0 PRINT" < SP AC E SD S\3_ S£ SPACE S D4 SP/\C£ SD3 

SPACE SD2 SPACE SP SPACE SD2 SPACE ,, SD3 SPACE SD, 
± SPACE SD S\3 SD SPACE}" 

53090 PRINT" i SPACE SD SU SV_ SU SB. SPACE SD4 SPAC 
E SD3 SPACE SD2 SPACE SD SP 4C E. SP2 SPACE SP3 SPA 
CJ. SP4 SPACE . SD Sü_ SV S_H SÜ SPACE}'' 
53100 PRINT" iSPACE SD SX SY SZ. SP "S PACE SD4 SPAC 
K 5^1 SP^CE SP2 SPACE SD SPACE SD2 SPACE SD3 SPA 
CE SD4 SPACE SD SX SV SZ. SD SPACE}" 
53110 PRINT" < SP ACE SP S\3 SD SPACE SD4 SPAC E SD3 

SP ACE SD2 SPACE SD SPACE SD2 SPACE SD3 SPA CE SD 

£ SPACE SD Sil Sfi SPACE y " 

53120 PRINT" { SPACE SPS SPACE SD4 SPACE SD3 SPACE 

§PZ SPACE SO SPACE SD2 SPACE SD3 SPA CE SD4 SPAC 
E SPS SPACE }" 
53130 PRINT" iSPACE, SPS SPACE SD4 SPACE SD3 SPACE 

SV2 SPACE SD SPACE SD2 SPACE SB3 SPACE SD4 SPAC 
E SD5 SPACE}" 
53140 PRINT" { SPACE SPS SPACE SD4 SPACE SD3 SPACE 

SP2 SPACE SD SPACE SD2 SPACE SD3 SPACE SD4 SPAC 
E SPS SPACE}" 
53150 PRINT" { SPACE SD5 SPAC E SD4 SPACE SD3 SPACE 

SD2 SPACE SP SPACE S D2 SPACE SD3 SPACE SD4 SPAC 
£ SPS SPACE ! " 
53160 PRINT" I SPACE SP? SPACE SD4 SPACE SV3 SPACE 

SP? SPACE SD SPACE SD2 SPACE SD3 SPACE SD4 SPAC 
£ SPS SPACE}" 
53170 PRINT" {SPACE SP5 S PACE SD4 SPACE SD3 SPACE 

SD2 SPACE -SP SPACE SD2 SPACE SD3 , SPACE SD4 SPAC 
C SPS SPACE}" 
53180 PRINT" { SPACE SD5 SPACE SD4 SPACE SD3 SPACE 

SD? SPA CE SD S PACE S D2 SPACE SD3 SPACE. SD4 SPAC 
£ SD5 SPAC E}" 
53190 PRINT"{SP4C£ SD5 SPACE 504 SPACE SD3 SPACE 

SD2 SPACE SD SPACE SD2 SPA CE SD3 SPACE SD4 SPA C 
E i,D5 SPACE}" 
E13200 PRINT"{SW SJ37 SJ > " ■ 
53210 PRINT" CStf SJ37 SJ) " 
53220 PRINT" < S-11 SHIFTSPACE S15 C<* S-lll" 



<60> 
<9> 

<100> 
<134> 
<167> 
<143> 
<230> 

<61> 
<119> 

<1BB> 
<116> 
<131> 
<1I2> 
<171> 

<76> 

<230> 



<S8> 



<114> 



<124> 



<134> 



<164> 



<230> 



<124> 



<194> 



<184> 



<194> 



<204> 



<214> 



<224> 



<234> 



<244> 



53230 PRINT" -r a- ■h'-t; if -wir irir-rK CK} tf-irif y-if-c'irn'-ifir-ii''if-ir-ii'irTr t({CG} * 

-ir'irrnir-r-n'it-ir" 

53240 PRINT" CSP9 CT_ SP 19 CM SP? UPS}" 

53250 POKE 2023, 80: POKE 1983, 94s PDKE 1943, 93i POKE 

56295 , 9 : PDKE56255 , 9 

53255 POKE 56215,9 . 

53260 SYS 2491 3 RETURN 

ENDE DES LISTINGS 



<254> 
<224> 
<234> 
<210> 

<4S> 
<9B> 

<186> 
<113> 
<145> 
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Haunted Inn 

ü 
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.eine Cola 



Jumpin ' iäfttf e i$r <fer vielbeschäftigte Oberkellner im Haunted 

Inn. Mit nie ermüdendem freundlichen Lächeln versorgt er grim- 
mig dreinschauende Zombies mit Haunted SpezM Cocktails, die 
aus ihnen augenblicklich zufriedene Gäste machen. 



MrapHpHi 

«WS.. . _ 









Wegen der für Gasthäuser ungünstigen 
Verbindung der Stockwerke durch Leitern 
ist Eddie gezwungen, jeden Gast einzeln 
zu bedienen. Erschwerend gesellen sich 
diesem Umstand zwei niederträchtige 
Spinnen hinzu, denen es durch geschicktes 
Manövrieren oder Überspringen auszuwei- 
chen gilt. Besonders zu hüten hat sich Ed- 
die vor dem von Zeit zu Zeit aus dem 
Nichts auftauchenden Skelett, das, wo es 
nicht übersprungen werden kann, nur 
durch hektisches aber entschlossenes Hin- 
und Herlaufen vertrieben werden kann. 
Für jeden Schritt erhält Eddie (der der Ge- 
werkschaft angehört) einen Punkt. Das er- 
folgte Servieren eines Cocktails wird mit 
Bonuspunkten belohnt, deren Anzahl sich 
nach dem Stockwerk richtet. So gibt es im 
Erdgeschoß 100, in der mittleren Etage 150 
und im Obergeschoß 200 Punkte pro be- 



dienten Gast. 

Das Füllen und Abstellen der Gläser er- 
folgt durch Knopfdruck. Gesteuert wird 
Eddie durch Joystick Port 2: links/rechts 
für gehen; Feuerknopf & links/rechts für 
springen; hoch/runter für die Leitern. 
Insgesamt stehen Eddie vier Leben zur 
Verfügung, die entweder durch Berührung 
mit den ungeselligen Hausgeistern oder 
durch Zeitmangel beendet werden. Schafft 
er es jedoch gegen alle Erwartungen, alle 
Gäste in der gegebenen Zeit zu bedienen, 
wird ihm die verbliebene Zeit als Sonder- 
bonus gutgeschrieben. Zur Belohnung 
wird er in den nächsten Gastraum versetzt. 
Sumasumarum gibt es drei Räume. Nach 
dem Durchlaufen aller Räume erhöht sich 
die Geschwindigkeit der Spinnen. Um das 
Ganze etwas abzukürzen, können Räume 
und Geschwindigkeit im Titelbild mittels 



Joystick eingestellt werden: hoch/runter 
für Räume 1-3; links/rechts für Geschwin- 
digkeit 1-5. ~ 

Durch Drücken der Fl-Taste kann das 
Spiel zum Naseputzen unterbrochen wer- 
den, die F3 -Taste bewirkt Abbruch und 
Rückkehr zum Titelbild. 

Zur Eingabe: 

Teil 1 (Haunted) abtippen und saven 
NEW tippen 

Teil 2 (Haunted Inn 2) abtippen und direkt 
hinter Teil 1 auf Kassette oder Diskette sa- 
ven 

zum späteren Laden nur SHIFT & RUN/ 
STOP drücken 

Teil 1 lädt Teil 2 automatisch nach und star- 
tet das Spiel 

*••••••••••••••• 




C-64 LISTING + CHECKSUMMEN (C V1.0> 

10 REM #***#**#*####*****#*****#****** 
20 REM # HAUNTED INN * 

30 REM * DATAS * 

40 REM #**#*##*«**»*#**#«*+#********** 

100 paKE532B0,0:POKE53281,0:PRINT"CCtE4« DOHNH ! 
"TABU3) "{REO} BITTE CS/VfCETWARTEN" 

101 PRINTTAB(B) " iDOHN. EltfEJ DAT EN^S/MCEJ WERDEN* SP 
ACEiB INGELESEN" 

104 P0KE56333, 127: POKE56, 67: POKEI ,51 

135 FQRI=0TO 1023: POKEI 4336+1 ,PEEK C 53248+ I ) :NEXT 

106 FrJKEl,55iPOKE56333,129 

1B7 READA: IFA=-1THEN1 10 

108 FDRI=0TQ7:READB:PDKE14336+A*B+I,B!NEXT 

10? GDTO107 

1 10 FORI=15360TGI5422s READA: POKEI ,A: NEXT 

111 F0RI=15424TO15486:READA: POKEI ,A:NEXT 

112 FORI=1548STO15550: READA: POKEI ,A:NEXT 

1 13 F0RI=155S2T01 5614:READA: POKEI , A: NEXT 

114 F0RI=15616T01567S:READA:P0KEI ,A:NEXT 
113 FaRI=15680TGl 5742: READA: POKEI ,A:NEXT 

116 FORI=15744TQ15906: READA: POKEI, A: NEXT 

117 FaRI=15B08TO15870:READA:POKEI ,A:NEXT 
HB FORI -1S072TO15934: READA: POKEI, A: NEXT 
119 F0RI=15936TO1599S: READA: FOKEI.A: NEXT 



<15> 
<3S> 
<144> 
<45> 

<tt> 

<122> 

<44> 

<255> 

<202> 

<24> 

<5> 

<19ö> 

<247> 

<136> 

<100> 

<54> 

<199> 

<90> 

<117> 

<135> 

<153> 

<42> 



120 FDRI=16000TO16062i READAsFOKEI ,AiNEXT 

121 PRINT" CCLE4RJ" 

122 IF PEEK(186)<>-1 THEN 150 :REM DISK 

123 POKE631,131:POKE 199,1 :NEW 
150 REM DISKLOADER 

152 PRINT" C ClE4 fl:>LQflD"CHR$ (34) " HAUNTED {.SPACES INN 
2"CHR*<34> " ,8" 

153 PRINT" CP0WW4T RUN" 

155 FOKE 631,19sF0KE 632,13:P0KE 633,l3sP0KE 193 
, 3: NEW 

200 REM >» ZEICHENSATZ <<< 

20 1 D AT A0 , 255 , 255 , 255 , 255 , 255 , 255 , 255 , 255 

202 DATAI, 0,62, 115, 115, 115, 127, 115,0 
2S3 DATA2,0, 126, 1 15, 126, 1 15, 1 15, 126,0 

204 DATA3, 0,62, IIS, 112, 112, 115, 62,0 

205 DATA4, 0, 126, 115, 115, 115, 115, 126,0 

206 DAT A5, 0,63, 112, 112, 124, 112, 63,0 

207 DATA6, 0,127, 112, 11 2, 124, 112, 11 2,0 

208 DATA7, 0,62, 115, 112, II 9, 115, 62,0 

209 DATAB, 0,1 15, 115,115, 127, 115, 115,0 

210 DATA9, 0,38,28, 28, 28, 2B, 62,0 

211 DATA10,0,31,14,14,14,110,60,0 

212 DATA1 1,0, 115, HS, 120, 124,118,115,0 

213 DATA12, 0,1 12, 112, 112,112,115, 127,0 

214 DATA13,0,97, 115, 127, 115, 115,115,0 

215 DATA14, 0,97, 115, 123, 119, 115,113,0 

216 DATAIS, 0,62, 115, 115,115, 115,62,0 

217 DATA1 6, 0,126,1 15, 115, 126 ,112, 11 2,0 

218 DATA17, 127, 254, 191, 223, 231, 249, 127,0 

219 DATA18, 0,1 26, 115, 115, 126, 118, 115,0 



<217> 

<15i> 

<19B> 

<2> 

<224> 

<92> 
<160> 

<94> 

<147> 

<t96> 

<223> 

<177> 

<223> 

<152> 

<216> 

<126> 

<112> 

<153> 

<2t9> 

<217> 

<92> 

<214> 

<199> 

<163> 

<216> 

<220> 

<65> 

<209> 
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Sßfifc** 



M 




220 DATA19, 0,63, 112, 112, 62, 3, 126,0 <178> 

221 DATA20, 0,127,95,28,28,26,28,0 <49> 

222 DATA21, 0,115, 115, 115, 115, 115, 62,0 <130> 

223 DATA22, 0,115, 115, 115, 115, 62, 2B,0 <46> 

224 DATA23, 0,115, 115, 115, 127, 115, 97,0 <165> 

225 DATA24.252, 126, 158,238,246,246,252,0 <21B> 

226 DATA25,0, 115,115, 115,62, 12, 12,0 <171> 

227 DATA26,0, 127,103, 14,56, 115, 127,0 <59> 

228 DATA27, 192,255,192, 172,172,255, 192,192 <18B> 

229 DATA29,3,255,3,3,3,255,3,3 <1B9> 

230 DATA30, 255, 254, 188, 152, 152, 188, 254, 255 <tB5> 

231 DATA31, 0,60, 60, 60, 60, 60, 255, 255 <143> 

232 DATA33,0,0,0,3,7,23,2B,23 <64> 

233 DATA35,6,7,3,1,31,63,255,25S <24> 

234 DATA36, 24, 56, 240, 251, 251, 251, 123, 123 <136> 

235 DATA37,0,15,23,27,29,29,21,125 <15> 

236 DATA3S, 123,251,243,255, 139, 139, 139, 139 <220> 

237 DATA39, 199, 199,227, 113,63,0,255,255 <246> 

238 DATA40, 56, 248, 240, 251, 251 ,251,123,123 <47> 

239 DATA41, 0,0, 0,240, 248, 250, 206, 250 <105> 

240 DATA42,255, 126,60,24,24 ,60, 126,255 <249> 

241 DATA46, 1,1 ,1,1,1,1,1,1 <254> 

242 DATA4B, 0,62, 115, 115, 115, 115, 62,0 <1> 

243 DATA49, 0,28, 60, 124, 28, 2B, 126,0 <207> 
214 DATA50, 0,62, 115, 3, 28, 115, 127,0 <B0> 

245 DATA51, 0,62, 115, 6, 3, 115,62,0 <219> 

246 DATA52, 0,112,112, 118, 127, 6, 6,0 <4B> 

247 DATA53, 0,127, 112, 126, 3, 115, 62,0 <7B> 
24S DATA54, 0,62, 112, 126, 115, 115, 62,0 <248> 

249 DATA55,0,127,115,6,12,24,24,0 <172> 

250 DATA56, 0,62, 115, 62, 115, 115, 62,0 <14B> 

251 DATA57,0,62, HS, 115,63,3,62,0 <3> 

252 DATA59,0,0,0,0,0,0,255,255 <178> 

253 DATA60, 255, 170, 255, 171, 213, 213, 171, 255 <23B> 

254 DATA61 ,255,127,61,25,25,61,127,255 <120> 

255 DATA62, 255, 170,255,0,0,0,0,0 <169> 

256 DATA64,0,12B,192,224,240,24B,252,254 <4B> 

257 DATA91, 254, 254, 254, 0,239, 239, 239,0 <159> 

258 DATA93, 255, 255, 255, 0,239, 239, 239,0 <199> 

259 DATA95,127,63,31,15,7,3,1,0 <21S> 

260 DATA104, 0,0, 0,0, 0,24, 24,0 <40> 

261 DATA105, 0,24, 24, 16,0,0,0,0 <B5> 

262 DATA! <119> 

300 REM »> SPRITES <« <74> 

301 DATA63, 240, 0,255, 128, 0,234, 128, 132, 235, 12B.2 
00,234,160,200,232,171,255,232 <158> 

302 DATA0, 168, 234, 129, 80, 21, 15,240, 255, 127,240, 2 

55, 95,0, 255, B4, 0,255, 84,0 <159> 

303 DATA215, 84, 0,234, 80, 0,235, 64,0 <145> 

304 DATA253, 0,0, 213, 0,0, 213, 0,0, 213, 0,0, 63, 240,0 <195> 

305 DATA15, 252, 0,63, 160,0,58, 160, 132, 58,224, 200, 
58,168,200,58,42,255,58,0 <213> 

306 DATA16B,5B,161,80,5,79,240,63,223,240 t 63,215 
,192,63,213,0,63,213,0,53,213 <77> 

307 DATA0,5B, 148, 0, SB, 20B, 0,63, 80,0,245,00, 0,212 
,84,0,240,20,0,63,63,192 <120> 
30B DATA0, 63, 252,0, 1 1 ,255,33, 10, 171 , 18, 1 1 , 171 , 1B 
,42,171,255,248,171 , <21> 

309 DATA42, 0,171, 5, 74, 168, 15, 192, 84, 15,255, 255, 3 
,255,255,0,255,255 <231> 

310 DATA0, 31 ,255,0,21 ,255,0,21 ,255,0,5,255,0, 1 , 1 

27 <242> 

311 DATA0, 0,87,0, 0,87, 0,0, 87, 0,15,252 <49> 

312 DATA0, 255, 240,0, 43, 252, 33, 42, 172, 1B, 46, 172,1 
8,170,172,255,242,172,42,2,172 <13S> 

313 DATA5, 106, 172, 15, 193,80, 15,255,252,3,255,252 
,0,255,252,0,127,252,0,87,252 <79>- 

314 DATA0, 87, 252, 0,23, 252, 0,5, 252, 0,5, 95, 0,21, 23 
,0,20,15,3,252,252 <H5> 

315 DATA0, 63, 0,0 ,255, 192, 59, 255, 240, 39, 255, 240, 3 
9,255,240 <21S> 

316 D AT A254, 255,240,43, 255, 248, 20,255, 212 <70> 

317 DATA63, 21, 60, 63, 255, 252, 15, 255, 252, 3, 255, 240 
,0,255, 192,0,255, 192,0,255, 192 <224> 

318 DATA0,255, 192,0,247, 192,0,247, 192 <21B> 

319 DATA0.209, 192,0,225,192,0,2, 12B <77> 

320 DATA0, 63, 0,0, 255, 192, 59, 253, 240, 39, 255, 240, 3 
9,255,240 <223> 

321 DA TA254, 255, 248, 43, 255, 244, 20, 255, 252 <211> 

322 DATA63, 21, 60, 63, 255, 252, 15, 255, 252, 3, 255, 240 
,0,255,192,0,255,192,0,255,192 <229> 

323 DATA0.255, 192,0,247, 192,0,247, 192 <223> 

324 DATA0.255, 192,0,226, 192,0, 160,0 <169> 



325 DATA0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0,0, 
40,4,0,136,17,0,136,73 <211> 

326 DATA195, 152, 97,65,68,76,85, 25, 96, 105, 81, 97,1 
05,17,100,20,17,100 <30> 

327 DATA0, 17 ,100, 0,17, 100, 0,17, 68,0,1, 4, 0,1, 4,0, 

1 <65> 

32B DATA0,124,0,0,84,0,0,10B,0,0,56,0,B,40,0,2,2 
14,128,2,16,128 <t6> 

329 DATA0, 124, 0,2, 16, 128,36, 124, 72, 24, 16, 48, 32,1 
6,8,0,56,0,0,124,0 <103> 

330 DATA0, 68, 0,0, 68, 0,0, 0,0, 0,68, 0,0, 68, 0,0, 0,0, 
1,199,0 <227> 

331 DATA3, 255, 0,15, 255, 192,14,170,192,46,238,200 
,174,138,202,162,170,10,82,2,5 <4B> 

332 DATA240, 16B , 15, 240 , I 16,63, 255 ,87,255 , 63, 223, 
252,63,223,240,15,223,192,3,223 <232> 

333 DAT A0, 3, 87, 0,3, 87, 0,3, 71, 0,3, 71 ,0,3, 71, 0,0, 6 

B, 0,3, 207,0 • <171> 

334 DATA1, 17, 64, 6, 102, 144, 6, 170, 64, 6, 239, 144, 26, 
255,164,22 <231> 

335 DATA190, 144, 6, 255, 144,1 ,190,164,6,191,144,6, 
254,64,6,190,64,1,185,0,1,186 <133> 

336 DATA64, 6, 169,0,1, 164,0,0,100,0,0,100,0,0,16, 
0,0,16,0,0,16,0,0,16,0 <50> 

337 DATA0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,8,0, 
8,34,0,34,34,0,134,38 <90> 

338 DATA195, 145, 17,65,65, 100,85, 1 ,101 , 105,1 ,100, 
85,65,100,0,17,100 <71> 

339 DATA0, 17,68,0, 17,68,0, 17,64,0, 16,64,0,16,64, 

0,16 <16> 

ENDE DEB LISTINGS 
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C-64 LISTING + CHECKSUMMEN (C V1.0) 

1 REM #***#*#**«■**#*##***#*####*#«»#** <112> 

2 REM » HAUNTED INN * <20> 

3 REM * EY UWE HEINRICH * * <150> 

4 REM # MARCH '87 * <26> 

5 REM #*##*■*#**###*##*####*##**#*##### <116> 

6 PRINT"{C£E4ff}" <36> 

7 V=5324B: S I =54272 s HX=V: HY=V+1 : Wl=V+2: W2=V+4s JO= 
56320; CQ=53278 <I98> 

8 A*(l)="tS£4C£2> ! )":A*(2)="J J ' < " i A$ (3>=" {. SPACE ! 
*7.!,":L*="C3" <38> 

9 B*U)-"Z SPACE2 } !)"iB»t2)="j #*": B*(3>=" I SPACE l 

*"/•&" <48> 

10 POKEV+32,0:POKEV+33,B:POKEV+17,27fPDKEV+24,31 
:POKEV+34,14:PaKE2,0 <226> 

11 R=l:Z=l:SC=0sHI=0;GS=2 <244> 

12 LI=3:POKEV+17,27:GQSUB162:POKEV+17,ll <101> 

13 0NRG0SUB258, 278,301 <B3> 

14 GOSUB340 <93> 

15 POKEBI+24,15 <154> 

16 POKEV+21 ,7iPDKEV,80jPDKEV+1 , 197iPOKEV+2,250;P 
OKEV+3,101:POKEV+4,130 <32> 

17 PQKEV+5,149 <92> 

18 Y0=YiRl=0:R2=0:TR=0:GL=0:POKECO,0 <14B> 

19 PaKE5I,24!PaKE5I + l,14:FC]KESI+5,5:PaKESI+6,6 <124> 

20 POKESI+7,24:POKESI+S,200:POKESI ; H2,15:PDKESI+ 

13,9 <113> 

21 POKESI+14,2:PBK£SI+19,5:PQKESI+20,10+16«9 <190> 

22 GÜSUB208 <119> 

23 GGTD137 <119> 

24 T^T-l:PRINTTfiB<10>;SC:PRINTTAB(29);T;"afrr 5 

PACE UP2 y " = IFT< 1 THEN27 <117> 

25 IFT-SBTHENPOKEV+39,6 <26> 

26 RETURN " <168> 

27 PDKE214,20:PRINT"C8t4CKJ"sPRINTTAB(13)"{SffI£Z: 
SPACE2 SO SU ST SH1FTSPACE SO SF_ SHIFTSPACE ST S 

l SM SE SH1FT SPACE2 1 " ; GGTQ 1 48 <1B9> 

28 PQKE2041 ,250:PGKE2042,246: IFR1~1THENG05UB33:G 
OTO30 <51> 

29 X1=X1-GS:POKEW1,X1:IFXK70THENR1 = 1 <1B3> 

30 IFR2=lTHENG05UB35:G0TO32 <239> 

31 X2=X2+GS:PDKEW2,X2:IFX2>200THENR2=1 <206> 

32 POKE2041, 246 :POKE2042, 250 j RETURN, <53> 

33 X1=X1+GS:PDKEW1,X1:IFX1>235THENR1=0 <26> 

34 RETURN <176> 

35 X2=X2-GB:POKEW2»X2sIFX2<5BTHENR2=B <19B> 

36 RETURN <178> 
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37 IFX>255THENP0KEV+16,PEEK<V+16>0Rl;X-X-255 


<192> 


99 X=X+22; B0SUB37: GDSUB45: POKEHX , X : Y0=Y0+1 2: POKE 




38 RETURN 


<1B0> 


H Y , Y0 : GÜSUB24 : GDSUB28 


<56> 


39 IFX<0THENPOKEV+16,PEEK<V+i6)AND254:X=X+255 


<216> 


I 00 X=X+1 2: BGSUB37 : G0SUB45: POKEHX , X : POKEHY , Ys SOS 




40 RETURN 


<182> 


UB24:GOSUB60 


<160> 


41 G05UB72: IFXS>255TH£NPGKEV+16,PEEK (V+16) ORB: X5 




101 K=PEEK(CD> : IFK>BANDK< 10THEN14B 


<129> 


=XS-255 


<156> 


102 GOT0137 


<19B> 


42 RETURN 


<1B4> 


103 IFTR=1THEN137 


<21> 


43 G0SUB72: IFXS<0THENPOKEV+16 , PEEK ( V+16) AND247s X 




104 POKE2040,242; Y=PEEK<HY> 


<117> 


B=XS+255 


<34> 


105 Y0=Y-12: POKEHY ,Y0: X=X-B: G05UB39:BO5UB47: PGKE 




44 RETURN 


<196> 


HX , X : GOSUB24 : GGSUB6 1 


<74> 


45 IFPEEK (V+16>=1ANDX>45THENX=45 


<211> 


106 Y0=Y0-12;POKEHY,Y0:X=X-22:GOSUB39:GOSUB47:FO 




46 RETURN 


<1BS> 


KEHX , X : GD5UB24 : GGSUBZa 


<175> 


47 IFPEEK W+16)=0ANDX<45THENX=45 


<229> 


107 K=PEEK (CO> : IFK>0ANDK< 10THEN148 


<135> 


43 RETURN 


<190> 


1 08 X=X-lß: G05UB37 : GOSUB47: PGKEHX , X : GGSUB62 


<16> 


49 IFR<3ANDZ<3THEN53 


<1B7> 


1 09 X=X~Z2: G0SUB39: G0SUE47 J POKEHX , X s Y0=Y0+ 1 2: POK 




50 G=INT(RND(0>*20) : IFQOSTHEN53 


<127> 


EHY , Y0 : GDSUB2 4 : G0SUB2B 


<11B> 


51 IFPEEK ( V+21 > =7THENXS=X+40: GOSUB41 : POKEV+6 , XS: 




1 1 X=X -12: GDSUB39 s GGSUB47 : POKEHX , X i POKEHY , Y : GOS 




PQKEV+7 , Y: PGKEV+21 ,15: G0TG53 


<119> 


UB24:GGSUB60 

1 J 1 K=PEEK(CO) : IFK>BANDK< 10THEN14B 


<222> 


52 P0KEV+21,7:FGKEV+16,PEEK(V+16)AND247 


<125> 


<139> 


53 RETURN 


<195> 


112 G0TG137 


<20S> 


54 i FY= 1 97ANDX < 1 50THEN58 


<16Z> 


113 IFY< = 197ANDY>=149ANDXMU1-B)ANDX< (U1+8>THENT 




55 IFR<T3ANDZ<3THEN59 


<179> 


R=1:G0TG11S 


<206> 


56 D=INT <RND (0) *20) ; IFGK >5THEN59 


<3> 


114 IFY< = 177ANDY>=149ANDXMU2-S>ANDX< (U2+B>THENT 




57 IFPEEK (V+21)=7THENX5=X-60: GGSUB43: PGKEV+6,XS: 




R=l:GOTOH9 


<42> 


PdKEV+7,YtPOKEV+21 , t5:GQT059 


<7> 


115 IFY<-149ANDY>=101ANDXXU3-8)ANDX< (U3+B)THENT 




58 FOKEV+21 , 7:P0KEV+16,PEEK(V+!6)AND247 


<131> 


R=l:GOTOi27 


<125> 


5? RETURN 


<201> 


116 IFY< = 149ANDY>=101ANDXXU4-8)ANDX< (U4+8)THENT 




60 PGKESI+1 , 14: POKES 1+5,5: PGKE5 1+6,6: PGKESI+4, 12 




R=1:GÜT0128 


<217> 


9s POKESI+4 ,128: RETURN 


<15B> 


117 G0SUB24:G05UB2a:GGT0137 


<175> 


61 PDKESI+1 ,4:PDKESI+6,5*16+B:PGKESI+4, 17+64:RET 




IIB POKEHX, U1:GOTO120 


<191> 


I.IRN 


<92> 


119 PGKEHX, U2: GOTO 120 


<198> 


62 PGKES I + 1, 14 SPUKES 1+4, 16: RETURN 


<49> 


120 POKE2040,244 


<I57> 


63 PGKEBI+l,5:POKESI+6,4:PÜKESI+4,17:P0KESI+4,32 




121 IFPEEK <JO> =126 THENY=Y-5: IFY< 1 49THENY=149: TR= 




+64: RETURN 


<221> 





<157> 


64 POKE5I+5,15:POKESI+4,33:FORJ=2TG25:FGRI=1TO20 




122 IFPEEK <JG)=1257HENY=Y+5: IFY>I97TH£NY=197i TR= 




BSTEPJ : POKESI+1 , T : NEXT: NEXT 


<191> 





<239> 


65 PGKESI+4,32:RETURN 


<152> 


123 PGKE2040 , 245: POKEHY , Y : GGSUB24 : G0SUB28 : GOSUB6 




66 POKESI+5,0:POKESI+6, 16*9: FORI=1TO100STEP2: PDK 




3 


"<202> 


ESI + 1 , I:POKESI+4,17 


<214> 


124 K=PEEK'{CG) : IFK >0ANDK<101HEN14B 


<152> 


67 POKES 1+4,1 28 : NEXT: RETURN 


<1B2> 


1 25 IFPEEK (JO) <>125flNDPEEK ( JO) Ol 26THEN137 


<192> 


6B PGKESI + U ,0:POKESI+12,05POKE5I+13,9*16+12:FOR 




126 GOTG120 


<19I> 


1= 1 00TO6STEF- . 4: P0KE5I +B , I 


<74> 


127 POKEHX, U3: GOTO 129 


<55> 


69 POKESI+1 1,17:POKES1+11,12B:NEXT:FORI=1TO10:PO 




128 P0KE(!X,U4: GOTO 129 


<62> 


KESI+1 1 ,0: FQRW=1T05B:NEXT 


<36> 


129 POKE204 0,244 


<I66> 


70 POKESI+1 1, 128: FORW=1TO50: NEXT: NEXT: PGKESI+11, 




130 IFPEEK (JO)=126THENY=Y-5: IFY< 1B1THENY=101 : TR= 




0: RETURN 


<40> 





<62> 


71 FDKESI+B, 250: POKESI+1 1,33t POKESI+1 1,32: RETURN 


<236> 


131 IFPEEK (JO)=125THENY=Y+5; IFYM49THENY=149= TR= 




72 POKESI+15, 5tPOKESI+lB,1295PGKESI+lB I i2B:RETU 







<102> 


RN 


<97> 


1 32 POKE204 , 245 1 POKEHY ,¥160811624: G0SUB2B : GOBUB6 




73 FDKESI+B, 150:POKESI + U,33:POKESI + 11,16 S RETURN 


<35> 


3 


<211> 


74 POKESI+1 1 ,129: POKES 1+11,0: RETURN 


<193> 


133 K=PEEK<CO> i IFK>0ANDK< 10THEN14B 


<16I> 


75 IFTRO0THEN137 


<223> 


134 IFPEEK <JG)<>125fiNDPEEK(JOX>126THEN137 


<201> 


76 GOSUB60 


<213> 


135 GOT0129 


<236> 


77 POKE2040 , 241 : X=X+5: GOSUB37 : G05UB45: POKEHX , Xs 3 




136 REM >>>> JOYSTICK <<<< 


<249> 


C=5C+i : G0SUB24: G0SUB2B 


<90> 


137 KN=PEEK(JO) 


<131> 


7B POKE2B40 , 240: X=X+S: 60SUB37 : G0BUB45; PGKEHX , X: G 




138 GETA*: IFA*=CHR* ( 133) THEN160 


<124> 


0BUB49 


<213> 


139 GOSUB24:GOSUB2B: IFA$=CHR* ( 134>THENPRINT" ICLE 




79 K=PEEK (CG) : IFK>0ANDK< 10THEN148 


<107> 


4fl>":P0KEV+21 ,0: SC=0: G0TO12 


<221> 


80 IFPEEK <JOX>119THEM 37 


<B7> 


140 I FKN= 1 I 9THEN75 


<66> 


81 GQTÜ75 


<231> 


141 IFKN=123THEN82 


<1B> 


82 IFTRO0THEN137 


<230> 


142 IFKN=111THEN214 


<243> 


83 GOBUB60 


<220> 


143 IFKN=103THEN93 


<19> 


B4 POKE2040, 243: X=X-5: GOSUB39: G0SUB47: PGKEHX, X:S 




144 IFKN=107THEN103 


<251> 


OSC+1 : G0SUB24; G0SUB28 


<213> 


145 IFKN=1260RKN=125THEN113 


<64> 


85 POKE2040 , 242: X=X-5: GDSUB39 : G05UB47i PGKEHX , X: G 




146 K=PEEK(CO) s IFK>0ANDK< 10THEN14B 


<174> 


OBUB54 


<203> 


147 GOTO 137 


<243> 


86 K=FEEK(CO) : IFK>0ANDK< 10THEN148 


<114> 


148 POKES 1+4,0 


<176> 


87 IFPEEK (JGXM23THEN137 


<38> 


149 P0KESI+4,129sFGKESI+5, 15: FOKESI +6, 16*15: POKE 




8B BOTDB2 


<231> 


2040,24B;FORI=0TO120ST£P2 


<1S5> 


89 PGKE2040,24S 


<135> 


1 50 POKES I+l,I:P0KEV+28,6: POKE V+39 , 1 : P0KEV+2B , 7 : 




90 IFPEEK (HY>=197ANDP£EK(HXm90ANDPEEK<HXX210T 




PGKEV+39, 10: NEXT: FGKESI+4 , 1 28 


<24> 


HEN92 


<46> 


151 PDKESI , 13:POKESI+l ,4; POKESI+5, 12:P0KESI+6, 16 




91 GDT0137 


<1S7> 


*15+12:POKE2040,249:FGRI=0TO40 


<122> 


92 PaKE214,17:PRINT 1, <Wf/I7E>";FORI = lTG3:PRINTTAB( 




152 POKES 1+4,129: POKEV+2B , 6 : POKE V+39 , 2 : POKE V+2S , 


. :, 


22) B* < I ) : NEXT :FRINT" tYELLOUJ " JB0TQ137 


<241> 


7;P0KEV+39,7:NEXT:P0KESI+4,12B 


<77> 


93 IFTR=1THEN137 


<11> 


153 POKEV+21,6:FOR«=1TD1000:NEXT 


<134> 


94 FGKE2040,240:Y=PEEK(HY) 


<B9> 


154 LI=LI-1:IFLK0THEN157 


<30> 


95 Y0= Y- 1 2 s POKEH Y t Y0 s X=X +B s GDSUB37 i GGBUB45 : PDKEH 




155 POKEV+2i T 0sPRIMT"<CJlE4/? SLUE VGHH1 1> "TAB U 5) 


' 


X , X : GOSUB24 : GOSUB61 


<197> 


"TRYtSP4CEJAGAIN"iFaRW=(JTGi500:NEXT 
156 P0KEV+17,11:GGTG13 


<3i > 


96 Y0=Y0- 1 2 : POKEHY , Y0s X=X+22s G0SUB37 i BGSUB45 : PDK 




<I26> 


EHX , X : GOSUB24 : GOSUB2B 


<33> 


157 PGKEV+21,0:PRINT ,, tCiE4/? REt) DÖUM 1 } "TAB U5> " 




97 K=PEEK (CD) : IFK>0ANDK< 10THEN148 


<125> 


GAME<SP4C£J0yER" : G0SUB68: FORW=0TO1000: NEXT 


<173> 


98 X=X +20 : GDSUB37 : G0SUB45: POKEHX , X : G0SUB62 


<215> 


158 UI=3: IFSOHITHENHI=SC 


<2i4> 
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159 GOTO 12 

160 GETA*: IFA*OCHR*<133)THEN160 

161 GOT0137 

162 R=i:Z=l:GOSUB340: IFPEEK (2) =0THENGGSUB197 

163 PDKEV+1 7 ,11: GGSUBi7B: POKEV+21 , 15: POKEV+17,27 

164 IFPEEK <JO)=li9THENZ=Z+l: IFZ>5THENZ=1 

165 IFPEEK! JG)=123THENZ=Z-i 2 IFZ<1THENZ=5 

166 IFPEEK <JO> =126THENR=R+i : IFR>3THENR=1 

167 IFPEEK(JO>=125THENR=R-l: IFR<1THENR=3 
163 PRINTTAB (9) " £ÜP HHITE i "R; TAB (35) Z 
16? ONZGOSUB173,174,175,176,177 

170 IFPEEK (JG)=111THEN1 72 

171 G0SUB2S:GDT0164 

172 SC=0: RETURN 

173 GS=2: TV=600: RETURN 

1 74 6S=5 : T V=700 : RETURN 

175 GS=9:TV=8Bß: RETURN 

176 GS=14sTV= 1000: RETURN 

177 GS=20:TV=1 200: RETURN 

179 PRINT" C CI.F4R DOHH BROUN S- CYAN J LAST t SPACES S 
COREtMHTTEJ "SC; TAB ( 19) " CSROHN_ S+ S^ CV4WlHIGHfSP 
4CE>GC0REt«HZ7EJ ,, HI;TAB<39) " iBROUH S-y"P 

179 PRINT" t/VOtfE 8ROWW>";:FaRJ=lTQ2:FURI=0TO3B;PR 
INT" {Sv^ " ; : NEXTjPRINT" iS^} " : NEXT 

180 PRINTTABUS) " iDOHH BLUE1 WELCOME { SF4CE >TQ" 

181 PRINT" iDOUH SPACE RED S- UHITE S* RED S^ UM , 
TE S# RED S+2 S- UHITE S* KEP S- UHITE S* RED S- 

MHITE Sw REP S^2 S- UHITE S* /?EO S-*2 S~ UHITE S 
* RED S^2 S^ WtfJTE S* «EP S* §= WHITE S* SPACE2 
RED S^ JWJTE S* REO S^2 S^ UHITE S* RED S±2 Sn ä 
MT£ S*V 

1B2 PRINT" CUP SPACE RED S^ HHlTE SQtflED S^ UHITE 1 
&J RED S^ H HITO Qt REP S- UHITE y@i RED S- «HITEi eCfi 
Eö S^ UHITE JeCRED S^ UHITE y&iRED S^ UH1TE J&ZC* R 
ED S~ HHITE} %®ißED S^ HHITE y&<i!®{RFV S- HHITE lBiR 
££ S.Z WHJ7E S# SHIFTSPACE RED S^ UHITE y»": 
183 PRINT" {RET Sjz HHlTE ySC REV S- HHITElGiR ED S- 
UH ITE y&i RED S- tftf7TE >@" 

IB4 PRINT" CUP SP4CE REO S^2 S^ HHITE iGiRED S±2 S 
- HHiTEJeCRE» S^ HHITE y%iREO S^ «WJ7E>@€RED S^ « 
HITE lGiRED S^ HHITE iei SHlFTSPACE RED S^ UHlTEy&l 
SHIfTSPACE RED S± S^ UHITE S* SHIFTSPACE RED S- 
UHITE y&iREÜ S^ HHlTE yet SHIFTSPACE REÜ S^ UHITEyfi 
*#£P S^ HHI7E J&JRED S^ HHITE ieiRED S- UHITE y%"t 

185 PRINT" {RFD £^ WW?7F >3" 

186 PRINT" tüP SP4CE REP S^ UHITE JQIRED S_i UHJTE 1 
et REP S^ HHITE ZSi RED S- HHITE iGiRED S^ «HJTEJetR 
EP S- HtfJ7E >a< RCP g- HHITE ?gK RCP S- tfW|rC >e<: SHJF 
TS PACE RED S^ WWJ7g ?3 t Stf JF7SP 4CE REO S^ UHITEi^S 
(.SHIFTSPACE, RED S- UHITE 1&I RE0 S^ 
PACE RED S- HHITEieiRED S- 



UHITE JGt SHlFTS 
HHlTE iVj 

187 FRINT"t RED S- HH27E >gt fiEO S- «ftfITE >e{ REO S- 
UP1TE 1&" 

1B8 PRINT" {ÜP SPACE RED S^ MKITE JeC ffEP S- HHITE 1 
efREP S^: HHITE >&(.RED Sjz UHlTE l&iRED S±2 Sjz UHITE 
jetRE» S^ WWZTE jet REP S^ UMTE y&i SHlFTSPACE RED 
Sn UHITE i&i SHIFTSPACE RED $+2 S^ y»J7E S» RED S± 
S- Htf 1 rE J e@ t Stf J FT SPACE RED S- HH1TE >91 RED S~ UH 
ITE ^&CRED S- HHlTE iet RED S- UHITjT}e"i 

1B9 PRINT" t REg S^ UHITE iS" 

i?ß print" hup. space uhite c*je@©tcoeee{c*}©ee<:c 
#)m@< sPACE c*yei sPACE c»> @@a tc*> ee <. space2 c*>et 

191 PRINT" t PfWW R1GHT3 <LIC.REP >k)EtSP4CE>H0PEtSP4 
CE> YOU < SPACE ! W I LL < SP4CE 3 HAVEt SP/iCE > A < SR>1CE 3 GPOP t 
SP4CO TIHE" 

192 PRINTTABU3) " iDOUN Bty£JHflRtSP4C£JHAR{:S£4C£} 
HARtCVSJ" 

193 PRINT" I DOHN RIGHT2 OR4WgE lSELECTt SP4CE >PIFFI 
CULTY{ SP/qCE >WITHt SP4C£ >YQURt SP4CE ? JOYSTICK" 

194 PRINTTAB<12) " { POWW >ANQ{ SPACE ! PRESS C SF/ICO BUT 
TON" 

195 PRINT" < DOUH y "TAB <5> " < LIG .GREEHy HOQH< UHlTE y "R 
; TAB (29) " C HG.GREEH y Z0NE< WHJ7F > "Z 

196 RETURN 

197 PRINT" C CLEAR 1 " iPRINTTAB C 10) " C D0UN11 BLÜEJHUG 
BALDSOFT { SPACE ! PRESENTS " : GQSUB207 

198 PRINTTAB<10>"{tfR LIG r BLUE SPACE3 1 JUHPINtgt S 
P4CE>EDDIE{SR4CE4J " : PRINTTAB< 18> " I DOUN CYAN y IN" : 
POKEV+2 1 , i : GOSUB207 

199 PRINT "C CLEAR V0UH1 2 > "TAB (14)" t fiEP JHAUNTED t£f. 
ACE} I NN " : GOSUB207 

2B0 PRINTTflB(B) " <.ÜP >'E£.Z.0W>HRITT£NtSP4CE>BY <.SPAC 



<32> 

<192> 

<1> 

<21B> 

<70> 

<242> 

<7> 

<149> 

<203> 

<2B1> 

<158> 

<227> 

<25> 

<20?> 

<64> 

<86> 

<112> 

<61> 

<68> 



<223> 



<190> 
<23> 



<129> 



<75> 
<1IB> 



<49> 
<229> 



<19> 
<161> 



<121> 
<233> 

<113> 

<119> 

<248> 

<97> 

<26> 

<209> 
<B2> 

<1> 

<163> 
<225> 



E3 UWE t SPACE 3 HE I NR I CH " : GOSUB207 

201 PRINTTflB(16)"tüP3 CREEtf} STARRING" 

202 PRINTTAB(8>" O?0tfM L I g,ffREEtf ?THEC SP4CE >NPiSTY{ 
S£^C£> SP I DER { SP ACE 1 5 1 STERB " : POKEV+2 1 , 7 : GOSUB207 

203 FRINT"-CCf-F4R DOUN1 2 1 "TAB (10)" C 0R4WSE ? SPECIAL 
t SP4CE >APPEARANCEt SP/!CE ?BY" : GOSUB207 

204 PRINTTABf 10) " HUP YELLOU SP ACE S BHftKV ^ SPACE ^HP, 
RRY^ SP^iCE? ? " : PR1NTTAB ( 18) "iDOUH PURPLE} AB" 

205 PRINTTAB ( 16) " {.DOHH L IG. REP >THE t SP4CE ; SKELETO 
N" ; POKEV+21 ,15: GOSUB207 

206 PDKE2, 255: RETURN 

207 FDRI=1TD2000: NEXT: RETURN 
20B PDKEV+17,91:G0SUB64 

209 PRINTTAB (13) "{. BLACK SHIFTS PACE SP_ SR SE_ SS2 
SHIFTSPACE SS SU ST2 SO SN. SHIFTSPACEy" 
21B IFPEEK(JD)=111THEN213 

211 GETQ*: IFQ*=CHR* ( 134) THENPRINT" i-CLEAR} ": PGKEV 
+21,0:aC=0:GOTQ12 

212 GOTG210 

213 RETURN 

214 IFPEEK(HYX>197THEN228 

215 IFGL=1THEN222 

216 I FPEEK ( H X ) >5ÖANDPEEK ( HX )< S5THEN2 i 8 

217 GGT0137 

2 1 8 FOKE2040 , 245 : GOSUB22 1 : G0BUB66: G0SUB73 : GL= 1 

219 P0KE214 ,20: PRINT" C BLACK y": PRINTTAB (13) " L SHIF 
TSPACE2 SD SO SHIFTSPACE SV SO. SU SR SHIFTSPACE 
SJ. SR Sj3 SHIFTSPACE YELLOU}" 

220 GDT0137 

221 POKE21 4 ,2B: PRINT" C REP >": PRINTTAB (13) " tSV SO 

sxsasysösxsoavsasxsäsxsösx yellou}"- 

RETURN 

222 1=1 

223 IFXXGA(I,1>-8)ANDX< (GA{ I f 1 ) +B> THEN226 

224 1 = 1 + 1: IFK=JUTHEN223 

225 GOTÜ137 

226 POKE2040, 245: G0BUB71 :P0KE214 , 17i PRINT" i YEL LO 
W3 " s FCIRJ = 1T03: PRINTTAB (Tfi ( I > ) B* ( J) 

227 NEXT:Gfi(I , 1 )=-10; GL=0: BC=BC+100: G0T0254 
229 IFY0149THEN236 

229 IFGL=0THEN137 ■» 

230 1=1 

231 IFXXGAtI ,2)-B)ANDX<(GA(I,2)+8)THEN234 

232 1 = 1 + 1: IFK=JMTHEN231 

233 GOTO 137 

234 PGKE2040 , 245 : GOSUB7 1 : P0KE21 4 , I 1 i PR INT " lY E LLO 
U} " ;FÜRJ=1TG3: PRINTTAB (Tfi ( I ) ) B* I J> 

235 NEXT:Gfi(I ,2)=--10: GL=0: BC=SC+t50: GDTD254 

236 IFYO101THEN137 

237 IFGL=BTHEN137 
23B 1=1 

239 IFXXGAd ,3) ~Si ANDX< (GA ( I ,3) +8) THEN242 

240 1 = 1+1: IFK=JTTHEN239 

241 GOT0137 

242 PQKE204B.245:GDSUB71:PQKE214.5:PRINT"C VEI.£.f?W 
}*:F0RJ=lTO3:PRINTTAB(TA(I) )B*(J) 

243 NEXT: GA ( I ,3) =-10: GL=0:SC=SC+200: GGTD254 

244 PQKE214 ,20i PRINT" i BLACK y " : PRINTTAB < 13) " tSff I F 
TSPACE2 SY SO SU_ SHIFTSPACE SW S4 SP SE SHIFTSPA 
CJE SI_ ST SHIFTSPACE2 J " 

245 PaKEV+39,lB:POKE2040,24B 

246 PÜKEBI+12,0:POKESI+13,5*16 

247 PDKE214, 21: PRINT" ty£ttO«>"(FORM=TT01STEP-l!S 
C=SC*1 : PRINTTAB ( 10) SC: GDSUB74 

248 T=T-1:PRINTTAB(29)T; " CiEFT SP4CC ÖP2>"iNEXT 

249 R=R+1: IFR>3THEN251 

250 FORW=0TO2000:NEXT:POKEV+17,lljGOTO13 

251 R=1:Z=Z+1: IFZ>5THENZ=5 

252 FORW=0TO2000: NEXTs POKEV+17 , 1 1 

253 ONZGOSUB 1 73 , 1 74 , 1 75 , 1 76 , 1 77i GDTG 13 

254 PDKE214 ,20: PRINT" iYELLOU} " z PRINTTAB (13) " <SHI 
FTSPACE Sff SO SHIFTSPACE ST SO SHIFTSPACE ST SH 
SE SHIFTSPACE Sß SA SR SHIFTSPACE YELLOUy 

255 KL=KL+1: IFKL=ANTHEN244 

256 GOTO 137 

257 REM >»> SCREEN 1 <<<< 

258 T=TV: G0SUB325: PRINT" C HOHE POW W23 " 

259 PnimTfmil^i " i LIG.BLUE} . {. BLACK Sä SX_ SQ SX S 
§X SQ Sy>":PRINTTAB(16) " Z LIG.BLUE l ■ i BLACK SQ S 
X SQ SX_ SQ SX>" - 

260 PRINTTAB (17) " J LlG.BLUE y . i BLACK SQ SX SQ SX} " 
iFORI=0TO14: PRINTTAB (1B) " I LIG .BLUE J . i BLACK SQ SX 
3"! NEXT 



<232> 
<2B2> 

<206> 

<93> 

<1S4> 

<112> 

<9B> 
< 1 00> 
<85> 

<25> 
<215> 

<3B> 
C20> 
<99> 
<79> 
<43> 
<11> 
<57> 
<67> 



<172> 
<60> 



<1> 

<30> 

<I42> 

<52> 

<65> 

<165> 

<229> 

<4> 

<9B> 

<30> 

<151> 

<203> 

<73> 

<47> 

<124> 

<190> 

<106> 

<46> 

<160> 

<167> 

<81> 

<63> 
<31> 



<49> 

<176> 

<253> 

<69> 

<56> 

<22> 

<195> 

<230> 

<14> 

<247> 



<70> 

<19B> 

<97> 

<169> 

<196> 



<93> 



<236> 
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261 PflfCP?! 4 ,Bi PRINT: PRINTTAB (2) " C BROHti X »< >>< » 
>< >»< »<<>>< »X »< >»<>>< " 

262 P0KE214,14:PRINTsPRINTTAB<2> " K BROUN K >><»>< 
»X >>< >><<>>< »X >>< »X »< " 

263 PnKE214 T 8: PRINT" t Pff4HGC >";F0RI=eTQ5: PRINTTAB 
(17)L*:NEXT 

264 PDKE214, 14: PRINT: FaRI=0TG5: PRINTTAB (2B)L*: NE 
XT 

265 PDKE214,B: PRINT; FaRI=0TO5:PRINTTAB<6>L*: NEXT 

266 FGKE214, 14: PRINT: FaRI=0TQ5: PRINTTAB U4)L* 5 NE 
XT 

267 P0KE214, 5s PRINT" CBiJ/E }":F0RI=lT03s PRINTTAB (9 
)A*(I)TAB(22)A*<I)TA8(32>A*(I):NEXT 

268 PDKE214,li:PRINT" {££»>" :FGRI=1T03: PRINTTAB (9 
>A*(I)TAB(22>A*<I)TAB(32>A*U> 

269 NEXT 

270 PDKE214,i7sPRINT"tGR£f«} ,, :F0RI=lTD3tPRINTTAB 
<22>ft*<I)TAB(32)A*<I) :NEXT 

271 POKE2I4, 16: PRINT" CBJ^^i"sPRINTTAB(4)"tS^IF7 
SPACE SB SA SR SH1FTSPACE 1" 

272 PRINTTAB <3>"{D0«W BLUE 1', ;••: PRINTTAB C4) " 

{ PURP LE I -**#=•' 

273 X=8B:Y=197:Xl=250:X2=130:Ul=242:U2«l3l:U3=15 
5:U4=67 

274 TA ( 1 ) =32: TA (2) =22: TA <3) =9: JU=2s JM=3i JT=3j AN» 
B: KL=0 

275 FaRI=lTO3«.GAU,l)=30:GA(2,I)=2BB:GA<3,I)=100 

sNEXT 

276 RETURN 

277 REM >>>> SCREEN 2 «« 

27G T=:TU+7Pias GUBIIB325: PRINT" { HOHE POHW2 3 " 

279 PRINTTAB (7) " t lJg.Bf.QO . {BLACK SO SX SS SX SQ 
SX SQ SX3"TAB<23> " { LIG.BLUE y . { BLACK SQ, SX SQ SX 
SQ SX SO SV} " 

280 PRINTTAB <B> »i LIG.BLUE y ■ { BLACK SQ SX SO SX SQ 
gjf>"TAB(24> "t UG.BLUE -J. {BLACK SS SX SQ SX SQ SX 

>" 

281 PRINTTAB (9) " { LlG-BLUE l , KBLACK SQ SX. SQ SX>"T 

P>B(2S> " K LIG.BLUE y . {BLACK SQ SX SQ SJCi " 

282 FnftT=glTni4=FRTNTTAB<10)"C f.IC.BI-C/C >.<B£dCK SQ 
SX>"TAB<26) "t LIß-BLUIZ J. KB LACK SQ 5X2": NEXT 

2B3 P0KE214,8:PRINT:PRINTTABf2> " {BflOHHX >><>X » 

*< »< »< >X >X >><< >X »< »< " 

284 POKE214,14:PRINTsPRINTTAB(2) " tBROHH}<»< »<> 

>< < > X >><>><> X »<<>><>><>>< " 

2B5 P0KE214,l4:PRINT"Cg&4NG£>":F0RI=BTO5:PRINTTA 

BU3)L*:NEXT 

286 PaKE214,14:PRINT:F0RI=BT05:PRINTTAB(25)L*:NE 

XT 

2B7 POKE214,8:PRINT:FORI=0TO5jPRINTTAB(9)L*sNEXT 

28B FOKE214,8:PRINT:FGRI=0TO5:PR1NTTAB(29>L*:NEX 

T 

209 PGKE21 4, 5: PRINT" {B£U£3":F0RI=1TQ3: PRINTTAB (4 

> ß* ( I ) TAB i 1 S > A* ( I ) T AB ( 2 1 > A* ( I ) ; 

290 PRINTTAB(32)A*(I)iNEXT 

291 PaKE214,ll:PRINT ,, {Ä£P3 l, :FDRI = lT03:PRINTTAB<4 

> A* ( I > TAB ( 15> A* ( 1 ) TAB (21 ) A* ( I ) ; 

292 PRINTTAB (32) fi* U) :NEXT 

293 F0KE214,17:PRINT"{GfiE£HJ":F0RI=iTG3sPRINTTAB 
<21>A*U)TAB(32)A*(I):NEXT 

294 P0KE2i4,16:PRINT"{et^CKT"=PRINTTAB<4> "KSH1FT 
SPACE SB SA SR SHIFTSPAC EJ " 

295 PRINTTAB (3) "CZJÖWtf BLUE_>} i " :PRINTTAB (4> " 

KPURPLE_i^***=" 

296 X=S0:Y=197sXl=250;X2=138:Ul=219:U2=i23:U3=25 
0:U4=90 

297 TA(l)=32sTA(2>=2i:TA(3>=15!TA<4J=4:JU=2: JM=4 
:JT=4:AN=10:KL=0 

29B FORl=iTO4:Gß(l,I)=30:GA<2,I>=i90:GA(3 T I)=150 
:GA(4, I) =56; NEXT 

299 RETURN 

300 REM »» SCREEN 3 <<<< 

301 T=TV+500-.GOSUB325: PRINT" {HOHE. DÖHN21 " 

306 PaKE214,B:PRINTsPRINTTAB<Z) " i BROUH i<»<»<» 

307 F0KE214,14:PRINT:PRINTTAB(2> " K BRQHN K. >>< »<> 
XOX>"X>X>X>XOX >><>><" 

308 P0KE214, S: PRINT" £OMMSg;J"sFaRI=0TO5i PRINTTAB 
(9)L*bNEXT 

309 POKE214.B: PRINT; FGRI=0TO5: PRINTTAB (16) L*sNEX 

T 

310 P0KE21 4, 14: PRINT: FORI=0TG5: PRINTTAB (22) L*: NE 

XT 



<2B9> 

<4S> 

<2Si> 

<164> 
<5t> 

<62> 

<134> 

<201> 
<144> 

<34> 

<234> 

<247> 

<159> 

<B3> 

<231> 
<163> 
<20l> 
<218> 

<ISS> 

<0> 

<13?> 

<135> 

<95> 

<187> 

<125> 

<123> 
<130> 

<199> 

<237> 
<179> 

<109> 
<181> 

<33> 

<1> 

<I4> 

<215> 

<192> 

<166> 
<1B6> 
<236> 
<3> 

<11B> 

<210> 

<146> 

<141> 

<84> 



3t l PDKE214,14:PRINT!FDRI=0TO5:PRINTTAB(29>L*:NE 

XT 

312 PGKE214 f 5: PRINT" {BLÜE>":F0RI=1T03: PRINTTAB <4 
)fi*(I)TAB<li)A*(I>TAB(18)A#(I); 

313 FRINTTAB(25>A*(I>TAB<32)A*(I>:NEXT 

314 POKE214, ll!PRINT"{R£DJ":F0RI=lTa3s PRINTTAB (4 
) A* < I > TAB i t 1 ) A* < I ) TAB ( 1B> A* C I > 5 

315 PR 1NTTAB ( 25) A* ( 1 ) TAB <32> A* < l i : NEXT 

316 paKE214,17;PRINT"<C«E£HJ* , sFGRJ = lTD3{PRlNTTAB 
tll)A*a)TABU8>A*<I}; 

317 PRINTTftB<25)A*(I)TAB<32)A*(l)sNEXT 

318 P0KE214 , 16: PRINT" {. BLACK y " ;PRINTTAB t'4) " K SHIFT , 
SPACE SB SA SR SHIFTSPACE l" 

319 PRINTTAB(3>"tPM« UME>i ; »:PRINTTAB(4) " 

{. PURPLE ^ "***=" 

320 X=80:V=197:Xl=250:X2=130:Uls2S0:U2=194:U3=14 

7sU4=90 

321 TA(l)=32:TA<2>=25:TA(3)=18sTA(4J=lliTA<5)=4i 

JU=4: JM=5s JT=5: AN=14t KL=B 

322 FORI=lT05:GA<l,I>=3B:GA(2,n=228:GAt3,IJ=174 
;GA<4,I)=U0:GA<5,I)=6B:NEXT 

323 RETURN 

324 REM >>>> FRAME «<< 

325 PRINT" K. CLEAR RED SPACE! " : 

326 FQRS=0TO1B: PRINT" tSQ SXJ ";: NEXT: PRINT 

327 PRINT" C S/MCE SX SPACE HHlTE>RTiaw'R" KREjD SQ S 
X BLACK SHIFTSPACE2 SH SA SU_ SH ST S£ SD SH1FTSP 
ACE2 SI SW2 SHIFTSPACE2 RED SQ SX SPACE H HIT EI ZQ 
NE"2"tfiEP SXJ": PRINT" tSP^CEJ"; 

320 FDRS=0TO18: PRINT" tSQ SXJ '*;: NEXT: PRINT 

329 PRINT" ti SPACE SX SQ S£ SQ SX^"SPC(27> " i HGREY l 

■ KBEJL sq sx so sx s&y " 

330 PRINT" < SP4CE SQ SX SQ SX> "SPC<29> ' , tHGfl£V>- KR 
ED SQ SX SQ SXy* 

33 1 "PRINT "T sp7cE SX SQ SX> "SPC (31 ) " K HGREY y . KRED 
SQ SY SQ1" 

332 FORS=0TQ6: PRINT "{ SPACE SQ SX? "SPC <33J " K HGREY 
? . {RED SQ SX>"iPRINT"{ SF/lCg SXJ "SPC (35) " KHGREY> . 
K RED SXV'jNEXT 

333 PRINT" K SPACE SQ SX? "SPC <33) " C HGREYJ . KRED SQ 
SX>" 

334 PRINT"<Se ! 5e£>"!!f r ORS=lTD19:PRINT"tSX SQ}"|:N 
EXT:PRINT 

335 PRINT" K SPACE SQ SX SPACE L IG. GREEH y SCORE: "SC 
:TAB(17>; "C HGREY >. { RED SX SQ SX SQ SPACE2 LIG-GR 
gfWTHTRH: "HI i TAB (36) " KHGREY} . { REO SQ SX>" 

336 PRINT" K SPACE SQ SX SPACE LIG.GREEN yHVESz "LI 
"{ SPACE4 HHITE y. { RED SQ SX SQ SX SPACE2 LIG.GREE 
W>TIME= "T;TAB(36> " K HGREY 1 . {RED SQ SX 1 " 

337 FRINT"t SP/iCE >";iFOR5=lTQ19iPRINT"tga SXl"j:N 
EXT 

33B RETURN 

339 REM »>> SPRITES EINSCHALTEN <<<< 

340 V=5324B 

341 PGKEV+21 ,0:POKEV+2B,7jPGKEV+37, l:PÖKEV+38,2: 
POKEV+39,lB:POKEV+29,0 

342 PDKEV+ 16,0: POKEV ,80: POKEV+1 , 180: POKE2040 , 240 
:P0KE2B41 ,246:PDKE2042,246 

343 PQKEV+4 , 5 : POKEV+4 1 , 8 : POKEV+2 , 235 1 POKEV+3 , 85 
-. POKEVH-4 ,110: POKEV+5 , 85 

344 PGKEV-J-6 , 255: POKEV+7 , 1B0I X 1=235: X2=l 10 

345 PGKEV+29,8;P0KEV+42,l:PUKE2B43j2i5sP0KE2B43 I 
247 

346 RETURN 

ENDE DES LISTINGS 



<232> 

<12i> 
<128> 

<251> 
<130> 

<253> 
<132> 

<25> 

<3B> 

<93> 

<34> 

<241> 

<210> 

<65> 

<85> 

<220> 



<35> 
<222> 

<119> 

<239> 

<227> 

<77> 

<243> 

<10> 

<246> 

<54> 

<134> 
<225> 
<240> 
<52> 

<95> 

<74> 

<192> 
<7i> 

<124? 
<233> 
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KLARTEXT-TABELLE 




für alte Commodore Rechner C 64/ VC 20 und C 1 6 



Auf vielfachen Leserwunsch haben wir uns entschlossen, unser Druckverfahren für 
Commodore-LiStmgs zu ändern., 

Steuerzeichen sowie alle Grafikzetchen werden zukünftig durch Klartext ersetzt. 
Der Ausdruck ist kompatibel zum bisherigen Druckverfahren, ein neuer Checksum- 
mer ist aus diesem Grund nicht erforderlich. 

Eingabehinweise für alle Commodore Rechner! 

Wer sich schon etwas näher mit den Commodore Rechnern befaßt hat, wird sicher- 
lich wissen, daß der Grafiksatz des CM sehr viele ähnliche Symbole enthält. Aus die- 
sem Grund ist es oft sehr schwer, einzelne Zeichen, wie zum Beispiel horizontale Li- 
nien, voneinander zu unterscheiden. Besonders macht sich dieser Nachteil in Listings 
bemerkbar, welche die Bildschirmgrafik mit PRINT-Zeilen aufbauen. 
Bisher haben wir in unserem Ausdruck lediglich die Steuersequenzen wie CTRL-RVS 
ON oder CTRL-8LUE durch Klartext ersetzt, ab dieser Ausgabe werden jedoch auch 
alle Grafjkzeichen durch ein Schlüsselcode ersetzt. Durch diese Methode sind Ver- 
wechselungen praktisch völlig ausgeschlossen. 

Wie arbeitet unser Klartext? 

Wer schon nach dem alten Verfahren Programme eingegeben hat, wird sicherlich kei- 
ne Schwierigkeiten mit der Umstellung haben. 

Für die neu hinzugekommenen Leser erkläre ich jedoch das Verfahren noch einmal 
grundlegend. 

Alle sogenannten Steuerzeichen (z.B. eine Farbe) sowie ein Grafikzeichen, werden in 
unseren LISTINGS durch ein CODEWORT, welches die Taste bzw. Tastenkombi- 
nation kennzeichnet, ersetzt. Eine Tabelle der Tastenfunktionen finden Sie in jedem 
Tronic-Magazin (z.B. Computronic o. Compute Mit). Das folgende Beispiel zeigt den 
Unterschied zwischen unserem alten und aem neuen Druckverfahren: 

C64 LISTING MIT CHECKSUMMEN <C Vl.O) 

10 REM BISHERIGER AUSDRUCK <M8> 

20 PniW<. DOUt44 > l ' |" <52> 

30 PRINT H #| _( |-, <-"* <85> 

40 PRINT" A'r^l H <I49> 

SO PRINT'-ENDE" <246> 
ENDE DES LISTINGS 
[DRUCK: F. B. 3 

C-64 LISTING + CHECKSUMMEN CC Vl.O) 

10 REH NEUER AUSDRUCK 

20 PRINT" W0HH4 SO CY9 SP}» 

30 PRINT"CS* SBSCSVS£SF^SGSfiSI_S_J SKi» 

40 PRINT"{C^ CB_ CC CD C£_ C£ CG>" 

50 PRINT"ENDE" 

ENDE DES LISTINGS 
CDRUCKeF.B. /O.S. J 



<1Ä2> 

<S2> 

<B5> 

<149> 

<246> 



Wie in dem Beispiel zu erkennen ist, werden alle Steuertasten durch die entsprechen- 
de Tastenbeschreibung- markiert. Das Won DOWN steht in diesem Fall für Cursor 
nach unten. Die Zahl dahinter gibt an wie oft die Taste betätigt werden mufä. In unse- 
rem Beispiel müßte also die Taste CURSOR abwärts viermal betätigt werden. Die ge- 
naue Beschreibung, welche Taste gemeint ist, entnehmen Sie bitte der Klartext- 
Tabelle, welche am Ende dieser Beschreibung abgedruckt ist. Achtung für C16 und 
C64 existieren zwei verschiedene Tabellen! 

Wie ebenfalls aus dem Beispiet zu erkennen ist, werden auch alle Grafikzeichen durch 
einen 2-Buchstaben-Code ersetzt. Der erste Buchstabe ist entweder ein »S« oder ein 
»O. Das »C« steht für die ..COMMODORE TASTE« und das »S« für die »SHIFT 
TASTE«. Der zweite Buchstabe bezeichnet die Aufschrift der Taste. Das »SA« in" un- 
serem Beispiel bedeutet also, daß die Taste SHIFT zusammen mit dem Buchstaben 
»A« betätigt werden muß. »C+« würde bedeuten, daß die Taste COMMODORE zu- 
sammen mit dem PLUS Zeichen gedrückt wird. Wird direkt hinter dieser Buchsta- 
benkombination eine Zahl angegeben, so gibt diese die Anzahl der jeweiligen Zeichen 
an. Das Zeichen COMMODORE Y wurde also in unserem Beispiel 9 mal eingege- 
ben. Durch diese Methode entfällt zukünftig das lästige Abzählen von mehrfachen 
Zeichen. 

Solken Sie einmal nicht wissen, welche Taste gemeint ist, so hilft Ihnen ein Blick in 
unsere Klartext-Tabelle weiter. 

Um im Listing Tastenbezeichnungen von normalen Zeichen zu unterscheiden, wer- 
den alle Tastenkennzeichnungen in geschweifte Klammern gesetzt. Diese dürfen 
selbstverständlich nicht eingegeben werden. Auch Leerzeichen innerhalb geschweif- 
ter Klammern dienen nur zur Trennung einzelner Tastenfunktionen und dürfen 
ebenfalls nicht eingegeben werden. Um die Tastenfunktionen noch besser hervorzu- 
heben, werden diese in unterstrichener Kursivschrift (Schrägschrift) dargestellt. Alk 
Zeichen außerhalb der geschweiften Klammern werden normal abgedruckt und auch 
eingegeben. 

Auf den ersten Biiek hört sich das sicher etwas kompliziert an, ist jedoch in der Praxis 
ganz einfach. Wenn man sich erst einmal an die in Klartext geschriebenen Zeichen 
gewöhnt hat, wird man den großen Vorteil dieser Schreibweise erkennen. 

Frank Brall 



Noch eine wichtige Anmerkung ! 

Aus technischen Gründen können drei Zeichen von unser m Ausgabegerät nicht ver- 
arbeitet werden. Diese Zeichen sind: Pfeil nach links, engl. Pfund, Pfeil nach oben 

Steht für den Pfeil nach links 

\ Steht für das englische Pfund-Symbol 
ft Steht für den Pfeil nach oben 

KUrttKt-Tabdk für Commodore M und VC 20 



TASTE NEBEN REOTTEN SHIFT 

SHIFT TASTE & TASTE NEBEN 

RECHTEM SHIFT 

SHIFT TASTE & 2. TASTE GANZ RECHTS OBEN 

SHIFT-TASTE & TASTE GANZ RECHTS OBEN 

2.TASTE VON GANZ RECHTS OBEN 

TASTE GANZ RECHTS OBEN 

TASTE GANZ RECHTS UNTEN 

SHIFT-TASTE 8t TASTE UNTEN RECHTS 

LEERTASTE (GROSSTE TASTE) 

FUNKTIONSTASTE Fl 

FUNKTIONSTASTE Fi 

FUNKTIONSTASTE FJ 

FUNKTIONSTASTE F4 

FUNKTIONSTASTE FS 

FUNKTIONSTASTE fi 

FUNKTIONSTASTE F7 

FUNK TIONST ASTE FS 

CONTROL-TASTE Sc l 

CONTROL-TASTE K 2 

CONTROL-TASTE St 3 

CONTROL-TASTE Sc 4 

CONTROL-TASTE fc 5 

CONTROL-TASTE & 6 

CONTROL-TASTE & 7 

CONTROL-TASTE & 8 

CONTROL-TASTE Sc 9 

CONTROL-TASTE 8c 

COMMODORE-TASTE 8c I 

COMMODORE-TASTE & 2 

COMMODORE-TASTE & 3 

COMMODORE-TASTE 8c 4 

COMMODORE-TASTE 8c 5 

COMMODORE-TASTE & 6 

COMMODORE-TASTE 8t 7 

COMMODORE-TASTE ti B 

CONTROL-TASTE UND DAS ... ZEICHEN 

SHIPT-TASTE UND DAS ... ZEICHEN 

COMMODORE-TASTE UND DAS ... ZEICHEN 

SHIFT-TASTE UND SPACE 



Klartext-Tabelle für Commodore CK und Plus 4 



DOWN 


CURSOR ABWARTS 


UP 


CURSOR HINAUF 


CLR 


CLEAR SCHIRM 


INST 


EINFUGEN 


HOME 


CURSOR IN ECKE 


DEL 


DELETE 


RIGHT 


CURSOR RECHTS 


LEFT 


CURSOR LINKS 


SPACE 


LEERZEICHEN 


Fl 


FUNKTIONSTASTE 


?2 


FUNKTIONSTASTE 


?3 


FUNKTIONSTASTE 


F4 


FUNKTtONSTASTE 


F5 


FUNKTIONSTASTE 


¥(, 


FUNKTIONSTASTE 


F7 


FUNKTIONSTASTE 


Fe 


FUNKTIONSTASTE 


BLACK 


SCHWARZ 


WHITE 


WEISS 


RED 


ROT 


CYAN 


TUERKIS 


PURPLE 


PURPUR 


GREEN 


GRÜN 


BLUE 


BLAU 


YELLOW 


GELB 


RVSON 


INVERSE EIN 


RVSOFF 


INVERSE AUS 


ORANGE 


ORANGE 


BROWN 


BRAUN 


LiG.RED 


HELLROT 


DCRF.V 


DUNKELGRAU 


MGREY 


MITTELGRAU 


LIG.GREEN 


HELLGRÜN 


LIC.BLUE 


HELLBLAU 


HGREV 


HELLGRAU 


CTRL... 


CTRL-ZE1CHEN 


S... 


GRAFIKZEICHEN 


C... 


GRAFIKZEICHEN 


SHIPTSPACE UNSICHTBARER CODE 



DOWN 

IIP 

CLR 

INST 

HOME 

DEL 

RiGHT 

LEFT 

SPACE 

Fl 

n 

F) 
F4 
FS 

F6 

F7 

F8 

BLACK 

WHITE 

RED 

CYAN 

PURPLE 

GREEN 

BLUE 

YELLOW 

RVSON 

RVSOFF 

ORNG 

BKN 

YL.GN 

PINK 

BL.GRN 

L.BL.U 

D.BLU 

L.GRN 

CTRL ... 

S... 

C... 

FLASHON 

FLASHOFF 

SHJFTSPACE 



CURSOR ABWÄRTS 

CURSOR HINAUF 

CLEAR SCHIRM 

LI N FÜGEN 

CURSOR IN ECKE 

DELETE 

CURSOR RECHTS 

CURSOR LINKS 

LEERZEICHEN 

FUNKTIONSTASTE 

FUNKTIONSTASTE 

FUNKTIONSTASTE 

FUNKTIONSTASTE 

FUNKTIONSTASTE 

FUNKTIONSTASTE 

FUNKTIONSTASTE 

FUNKTIONSTASTE 

SCHWARZ 

WEISS 

ROT 

TUERKIS 

PURPUR 

GRÜN 

BLAU 

GELB 

INVERSE EIN 

INVERSL AUS 

ORANGE 

BRAUN 

GELBGRÜN 

ROSA - 

BLAUGRÜN 

HELLBLAU 

DUNKtXBLAU 

HELLGRÜN 

CTRL.-7EICHEN * 

CRAI IKZEMCHEN 

GKARKZEICHEN 

BLINKF.N EIN 

BLINKEN AUS 

UNSICHTBARER CODE 



TASTE NEBEN INST DEL; RECHTS OBEN 

3. TASTE NEBEN DOWN VON RECHTS OBEN 
TASTE ÜBER RETURN ZUSAMMEN MIT SHIFT 
SHIFT-TASTE Sc TASTE CANZ RECHTS OBEN 
2. TASTE VON GANZ RECHTS OBEN 

TASTE GANZ RECHTS OBEN 

4. TASTE VON RECHTS OBEN 

5. TASTE VON RECHTS OBEN 
LEERTASTE (GRÖSSTE TASTE) 
FUNKTIONSTASTE Fl (VORHER DEFINIEREN) 
FUNKTIONSTASTE ¥2 (VORHER DEFINIEREN) 
FUNKTIONSTASTE F3 (VORHER DEFINIEREN) 
FUNKTIONSTASTE F4 (VORHER DEFINIEREN) 
FUNKTIONSTASTE F5 (VORHER DEFINIEREN) 
FUNKTIONSTASTE F6 (VORHER DEFINIEREN) 
FUNKT!ONSTASTE F7 (VORHER DEFINIEREN) 
FUNKTIONSTASTE F« (VORHER DEFINIEREN) 
CONTROL-TASTE & ) 
CONTROL-TASTE & 2 
CONTROL-TASTE & 3 
CONTROL-TASTE & 4 
CONTROL-TASTE & 5 
CONTROL-TASTE Sc b 
CONTROL-TASTE & 7 
CONTROL-TASTE Sc 8 
CONTROL-TASTE & 9 
CONTROL-TASTE St 
COMMODORE-TASTE 8c ] 
COMMODORE-TASTE Sc 2 
COMMODORE-TASTE 8c 3 
COMMODORE-TASTE & 4 
COMMODORE-TASTE Sc 5 
COMMODORE-TASTE & 6 • 
COMMODORE-TASTE Bc 7 
COMMODORE-TASTE St 8 
CONTROL-TASTE UND DAS ... ZEICHEN 
SHIFT-TASTE UND DAS ... ZEICHEN 
COMMODORE-TASTE UND DAS ... ZEICHEN 
CONTROL-TASTE UND "," 
CONTROL-TASTE UND "." 

SHIFT-TASTE UND SPACE 
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In Rambo-Manier 
Leben retten! 

Hochgestellte Pentagon-Persönlichkeiten vermuten noch immer 
zahllose amerikanische Kriegsgefangene auf der Seite vietnamesi- 
scher Guerilla-Truppen. Ihre Aufgabe ist es nun, mittels Bazooka 
(der Rambo-Typ), Munition und viel Fingerspitzengefühl einzelne 
Gefangene aus den versteckten Lagern, in der Nähe von Saigon, 
zu befreien. 

An sich keine schwierige Aufgabe! Doch 
um Optimisten zu warnen,muß gesagt wer- 
den, daß die Lager-Luft recht bleihaltig ist, 
zumal Ihre eigene Munition sehr begrenzt 
ist. Außerdem steht die Zeit in Saigon 
auch nicht still. Ihre Zeit ist anfangs auf ei- 
ne knappe Minute begrenzt, und mit je- 
dem Level nimmt Sie ab. Sputen Sie sich 
also, wenn Sie das Lager durchqueren, um 
den Gefangenen zu befreien. Dieser ist 
von den unfreundlichen Zeitgenossen an 
zwei Pfähle gefesselt (Bildschirm rechts 
unten). Lösen Sie die Fesseln, indem Sie 
sich dicht neben den Gefangenen stellen. 
Nach erfolgreicher Rettung (akkustisches 
Signal), wird auch für Sie ein Ausgang 
(EXIT links oben) sichtbar. Jetzt bloß nicht 
lange überlegen, sondern unverzüglich 
zum Ausgang eilen, da die Zeit weiter 
läuft. Falls Sie noch genügend Munition 
übrig haben sollten, zerstören Sie die drei 
Hütten. Diese bringen Ihnen gleich zwei 
Vorteile. Einmal eine Menge Punkte und 
zum Anderen werden die diversen Hek- 
kenschützen vorrüb ergehend lahmgelegt. 
Die Steuerung Ihres wagemutigen Hel- 
dens erfolgt über Joystick, mit den ge- 
wöhnlichen Funktionen. 



Wichtig für die Eingabe: 

Teile des Programmes sollten mittels der 
Basic- Abkürzungen (Anhang D, VC-20 
Handbuch) eingegeben werden, damit das 
Programm korrekt laufen kann. 





VC20 LISTING + CHECKSUMMEN <V V1,0> 

B P=36S79: X*= "FLEASEf S/MCP HA I T ! ! I SPAC£ > " : POKEP , 
BiPRINT" IC LEAR BLUE y i PDKEP-1 , 15iGPT01B <235> 

<169> 



2** SAIGON ** 
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<tl9> 



Jetzt mache ich Dich fertig Du altes Miststück!'* 



3 ALL RIGHTS RESERVED 

4 (C> BY FRÜGSOFT LTD 

5 LUT2 BLOMBERQ XI/86 
7 * 527 GUMMERSBACH * 
9 ******************* 

1B P0KE52,28:PDKES6,285L=44B 

II FGRT=lTa6sPDKE646,T:PRINT"CSM SJf SPACE2 SN SM 



<14B> 

<7B> 

<143> 

<172> 

<177> 

<25B> 
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SPACE2 S- SPACE2 SH_ SM. SPACE2 SH SM SPACE CM SM 
SPACE CG? " : POKEP-2 , 1*20+97: POKEP-4 ,T*20+100 

12 FORG=lTa99:NEXT!NEXT:PRINT"{tffltf£ DOHH 10 CG SP 
ACE2 CM CD Cf_ CG SPACE S^ SPACE CM CD SPACE2 CM. 
SPACE2 CG CM SPACE SM CG>" 

13 PRINT" t HOWC DOHH 11 SW SPACE2 CH SK SM CG SPAC 
£ Sjz. SPACE CM S PAC E SM. SPACE CH_ SPACE2 CG CM SPA 
CE2 CGI" 

14 PRINT" { Wffg D0HH12 SPACE Stf SP4CE CW SPACE2 C 
G SPACE S^ SPACE CM SPACE2 CG CM SPACE2 CG. CH. SP, 
ACE2 Cß~i" 

15 PRINT" < HOHE D0HH13 SM SM SP/ICC CM CG SP>1CE CH 
SP.4CC S- SPACE2 SM SH SPACE2 Sff SW SPACE CM CG 

SPACE CH}" 

16 FORT=15TO0STEP-. 1 i POKEP- 1 ,Ti NEXTsPBKEP-4,0: PO 
KEP-2,0 

17 F0RT=lT03sP0KE646,TsPRINT"C*KS0W SPACE21 RVSQ 
FP1":NEXT 

18 PRINT" tMO«C DOHH 19 HHTTEJUSERtSP^CODEFINEDtS 
/VJCOGRAPHICS" I POKEP-1 , 15 

1? FORI=716BTO716B+LiREADA:P0KEI,A:G=G+AsP0KEP-Z 

,a 

28 X*=RIGHT*<X*,13>+LEFT*<X*,1) (PRINT" iHOME. PPHH 
£6 R1GHT4 y£L40M>"X*:NEXT 

21 DATA4B, 120, 104, 100, 40, 57, 126, 174, 218, 246, 124, 
124,108,100,44,6,24,60,44,76,40,57,126 

22 DATA174,21S,246, 124,124, 124, 10B, 104, 192,24,36 
, 52, 52, 20,156, 126,93,107,119,42,62,62 

23 DATA54, 22, 3, 24, 36, 52, 52, 20, 148, 126, 93, 107, 119 
,42,62,62,54,50,96, , ,8,20,20,8,28,20 

24 DATA, , ,216, 100,216, , ,20,28,8,20,20,8, , , , , ,27, 
38, 27,,, 16, 44, 82, 44, 36, 82 ,197, 62,,, 42 

25 DATA, , , , , , 16, 186, B5, 16,90, 181 ,56,234, 138, 196, 
234,, 78,68, 68, 6B,, 129, 66, 74, 145, 86, 56 

26 DATA0, , , ,24,60,52,36,24,52,47,52,28,20, 18,27, 
, , , ,24,60,44,36,24,44,244,44,56,40,72 

27 DATA216,,, ,,,,9,4,3,3,5,5,3,5,11,23,,, ,64,224 
,160,40,208,32,112,184,248,216,240,104 

28 DATAIi6,,28,7,l,2,4,B,16,,24,112,192,96,4B,B, 
4 

29 DATA3,4 , 1 1 , 16,44,66, 177, 136,229,243, 191 ,237, 1 
89,109,62,28,6,138*78,162,82,50,114,211 

30 DATA151 , 148, 176,232, 164, 16, , , 18,36,36, 19,9,99 
,154, 134 ,,,,,,,,, 201, 245, 171, 229, 191 

31 DATA109, 62, 28, 16, 72, 36, 164, 232, 250, 246, 179, 23 
,148,176,232,164,16,, ,,3,7,14,31,56 

32 DATA1 12, 225,, 255, 255, 2B, 57, 127, 236, 198,, 255, 2 
55 , 23 1 , 204 , 1 52 , 63 , 1 27 , , 255 , 255 , 156 , 206 

Z-Z DATA 103, 243, 249, , 192,224, , 120,20,254,255, , ,19 
0,149, 149, 214,,, 255, 129, 157, 161, 161 

34 DATA157, 129,255,56,69, 129,114,11,146,100,255, 
, 147, 68, 84, 21 2, 85, 83, 255,, 3B, 85, 95, 85 

35 DAT A2 13, 37, 255, ,24 ,24, 1 10 , 1 10,24 , 24,24, ,255, 1 
27,56,31 , 1 ,7,3, ,255,255,63, 156,206,231 

36 DATA243, ,255,255,252,57,115,231,206, ,255,255, 
224 , 240 , 1 29 , 3 , 7 , , 255 , 254 ,112, 224 , 1 92 

37 DATA128, , , 1 17, 141 ,71 ,37 , 245, ,B5, , 1 19, B2, 82, 21 
B, 254,, BS, ,122,160,34,34,34, ,85, ,103 

38 DATA1B0, 182,180, 1B3, ,85, , 

40 IFG< >396B2THENPRINT" i CLEAR DÖH«2JYDU€S£^CEJMA 
DEt SF4C£ }SOME< SP/'CE >MI5TAKE5IN<: SP>lCr >THEt SP/iC£ >D 
ATACSP^CE>BTATEMENTB<DOM SPACES WHJ7C 1PRQ0VECSP 
ACE -J THEM ! " t END 

4 1 PDKEP , 156: PRINT" i CLEAR I " s POKEP-10, 255s PRINT" t 
PURPLE HOHE LEFT RVSQH S\_ SPACE20 Cjf?"i 

42 PRINT" { R1GHT7 RVSQH HHITE SU. S*5 SJ DOHH LEFT 
7 S^ RVSQFF RED1 *•/■&' ({WSM HHITE S^ DOHH LEFT7 
5^ RVSQFF RED J /0123 {. RVSQH HHITE S~>" 

43 PRINT" { R1GHT7 RVSQH HHITE SJ S* RVSQFF SPACE 
BLUE y > i SPACE RVSQH HHITE S* SKI " :PRINT" { QOHH4 YE 
LLQH RIGHT7 ftKSOH ?FRDUPLY" 

44 PRINT" J D0HN2 RIGHT3 RVSQH CYAH yP { SPACE PURPLE 
jrti SPACE GREEN lEi SPACE BLUE 5SJ. SPACE YELL0H 1EJ.SPA 
OK BLACKS TiiSPACE. HHITE JT i SPACE RED yS" 

45 FORG=lTO3:FORT=0Tai55TEP3lFDRB=12BTO2548TEP6( 
POKEP-1 ,T:P0KEP-3,BsNEXT 

46 POKE646,INT<RND(.)*7):PRINT"CW0«e DOHH 19 R1GH 
TL RKSOHJPROUDLY" i NEXTs NEXTs PÖKEP, 140 

47 PRINT" ( BLACK DOHH5 RlGHTS y&t RlGHT2 > { RIGH 

T2JB UWHM LEFTli yP>{ RlGHT2 RED > . { HHITE? + y ~{ RED y . < 
R1GHT2 BLACK ICI DOHN LEFTB YELLOH? " 

4B F0RB= 1 5TD0STEP- 1 1 FORT=255TQ 1 2BBTEP-3 : POKEP-2 , 
T:NEXTiPOKEP~l,GtNEXTs POKEP-2, 



<62> 
<45> 
<39> 
<47> 

<85> 

<252> 

<125> 

<159> 

<229> 

<9> 

<60> 

<46> 

<152> 

<15> 

<106> 

<240> 

<31> 

<243> 

<10> 

<253> 

<57> 

<56> 

<1B4> 

<23B> 

<93> 

<184> 

<52> 
<193> 

<109> 
<169> 

<164> 

<219> 

<130> 
<126> 
<125> 

<33> 
<96> 



49 PRINT* 1 CCLEAR? ": POKEP,B: POKEP-10, 242s PRINT" K.M0 
££ RVSQH HHITE SPACE SH SH SA ST SPACE? DO <.SPACC 
SY SO SU SPACEyirißiNT {. SPACE S? Z SPACE3 RVSQFF *" 

50 PRINT" C PPMH2 3 t { SPACE REO SJ_> NSTRLKTIONBtWHjmF 
J-}t SPACE y= {. SPACE RVSQ H SJ_ RVSOFF y 

51 PRINT" C PQWW2 > l { SPACE GREEN SGJ AUE CSPACf> PLAY t 
SPACE HHITE SPACE2 y 1 { SPACE? = {. SPACE RVSQH SC RVSO 
FF? "t POKEP-1, 15 

52 POKEP-2 , INT <250+4#RND ( . > > : BETA*! IFA*=" "THENS2 

53 POKEP-2, 0:IFA*= ,, I"THENPRINT ,, {DÖM£ SOOADINGt 
SPACE? INSTR. ! " s PBKE19B, 1 ! LOAD" INSTR. " , 1 i END 

54 PDKEP, 232: POKEP-10, 240 :PRI NT " tCLEAR RVSQH BLA 
CK>PLEAS£.{.SPACEyLQ(\D<. SPACE }pmT<.SPACE>ll. {. SPACE2 

RVSOFF y " i NEW 
ENDE DES LISTINGS 



<42> 



<110> 



<97> 
<93> 



<154> 



<79> 




VC20 LISTING + CHECKSUMMEN (V V1.0) 

CLRs PRINT" {CLEAR? " i P=36B79; UR=9Bj POKEP-10 , 242t 

POKEP, 104sPOKEP+2,URtGOTOll <29> 

2 **S*A*f«B«D«N«* <121> 

4 »INSTRUCTIONS-* <119> 

7 *FROGSOFT*LTD.* <11> 

11 C*="*";FORI = lTO3lREADA*:IFA*=" A, *THENQOSUB120 <6B> 

12 IFA*="_"GOTO300 < 3 4> 

13 FORJ^ITOLEN <A*) t B*=MID* (A* , , 1 } : PRINTB*C*" f LE 

FT? " ; : GOSUB200 < 2 1 6 > 

14 NEXTJ,I:N=N+l!G0T013 <37> 
3B /9 < 6 9> 

50 DATA" C CLEAR RVSQH HHITE SPACES SJ? NSTRUCTIONS 
^ SPACES RVSQFF? ","^" <159> 

51 DATA"{ BLf/C DOHH BLACK SY > QU t SP^ICE > H AVE { SPACE > 
CHOOSEN { SPACE? TO CSPACE3? BECOME <SPACE? AN { SPACE. J AM 
ER I CAN {. SPACE* > PEACET I ME C SPdCE SH S£ SR SO SPACE * 
!","—• <239> 

52 DATA-Olf/f DOHH SPACE4 YELLOH SPACE 2 SP ILACEt 
SPACE? VOUR { SPACE? WEAPON { SPACE ? I N { SPACE 2 > THETSP^C * 

E S;7>0YP0RT . " , " A " < 17B> 

53 DATA"t BH/C DOHH BLACK SPACE 10 SV>QUR {.S PACE SM 
y I SS I QN I SPACE y I S tS PACE y TP { SPACE-* * RETURN { SPACE > TO 
{ SPACE SIO IETNAMt SP^ICE ? ! " , """ <51> 

54 DATA'tSP^CEJ Sfl>ESCUE< SP>lC£ >THEt SPyiC£ >LASTCSP 
ACE. SP>- {SO?. <SWJ.WHO'5t SP/qCE >STILLt SPj1CC >BEING< 
5P/ICE >HELDEAPTIVE{ SPdCE > ! " . " A " " " <172> 

55 DPilto" { PURPLE SPACE 13 syjQUR { SPACE >ONLY{ SP/1CE > 
WEAPON < SPACE > 1 5 < SPACE 3 > YOUR t SP^ICE SS>AZODKACSR4C 

E 5S3LASTER. IBLUEy","*" <54> 

56 DOTA"<D0M« BLACK SPACE SD>ESTROYINBt SPyiCg >THE 
C SfVICf SC?HIUKB{SPACE_ SS}HEDStSP4C£J ANDtSP/tCEJKI 
L.L.ING{ SPACE yTUB< SPACE S£JNEMiEStSPi4C£J JSiSPACE?S 

T I LL { SPACE? U5E- { SPACE? FUL ! » ?","„" <I82> 

1 20 UR=UR- 1 : POKEP+2 , UR s A*= " " i POKEP-3 , 244 : POKEP- 
2,0:FDRI=t5TO0STEP-.9iPOKEP-3,244-I:NEXT <255> 

121 POKEP-3, 01 RETURN <127> 

200 POKEP-1, 15aFORT=lT05:POKEP-2,242sPOKEP-l, BSP 
OKEP-2, 142: POKEP-2, 03 NEXT <23> 

201 RETURN <B7> 

300 FQRG= 1 TD3 s POKEP-1 , 1 5 : POKEP-2 , 1 90i POKEP-4 , 230 
:FDRT=15TO0STEP-liFORY=lTD40:NESTY <110> 

301 POKEP, 104: POKEP-1 ,0: F0RR=lTO15iNEXTRs POKEP-1 
,T:POKEP-4,250-B*T:PDKEP,9:NEXTT,G:POKEP, 104 <23B> 

302 PRINT" C HOHE 00HN22 RIGHT4 RVSQH S£lRESStS£££ 

E SB SU. ST2 SO SHJ ! { RVSQFF UP?" <125> 

303 IFPEEK (37151 X 100THENPOKEP-2 ,0i POKEP-4 ,0s POK 

EP-1 ,15:GOTO305 <147> 

304 PCKE646,INT(RND(- )*7) s GOTO302 <49> 

305 PRINT" {. CLEAR y " i POKEP . 15Bl POKEP-10. 255 <18> 

306 PRINT" { HOME BLACK y+.~< SPACE2 yL<RED RVSOH y HOW 
{ SPACE y TQ{ SP ACE > USE { R VSOFF BLACK? L <SP^CE2> + ,-" | <219> 

307 PRINT" { HOME DOHH SPACE y* .-C SPACE yURED RVSQH 
y YOUR { SPACE * ST ICKi RVSOFF BLACK yLt SPACE y*.- { SPACE 
>NNNNNNNNNNNNNNNNNNNNNN" <109> 

308 FORI = 1TO500:NEXT:POKEP-4,24B:PRINT ,I CPO«N RIO 
HT2 RVSQH WHIT£JCDNTOLLINGCSP^CE>OUR{SP^C£.JHERO{ 
SPACES? ISt SP^CE >NOTC SP/fCC >THEt SP/iCE >EASIEST" <53> 

309 PBKEP-4,0: PRINT* {SPACE2 RVSON?aOB. {.BLACK SPA 
CEyBO{ SPAC£ yLaQK{ SPACE yUP{ SPACE y i " <1B2> 

310 FORI=1TO1500; NEXT; POKEP-4, 2501 PRINT" CPOKW Rjf_ 
SOH RIGHT2 BLUE yjQY{. SPACE yUP{ SPACE2 ys { RVSQFF BLA 

CK SPACE2?F {DOHH. LEFT > G " s POKEP -4,0 <167> 



Computronlc 



21 




*Cf^ 




311 FGRI«iTOBsFORT=lTO2B0lNEXT:POKE7913,5:PQKE7B 
91,4:P0K£P~2,23B <217> 

312 FaRT=iT02BBiNEXTiPGKE7913,7iP0KE7e9i,6:P0KEP 
-2,0:NEXTI <2> 

313 PRINT" { POtfH RVSOH RIGHT2 BLUE ! JOY { SPACE ! DPHN 
: I ftKSPFF Bf. /ICK SPACE2 !%{ DQHH LEFT!P>" iF0RI=lT08sF 
ORT=1TG2B0J NEXT: POKEP-2, 210 <254> 

314 P0KE7957 , 2 : P0KE7979 , 3 l FDRT= 1 TG20B : NEXT : PDKE7 
957,B:P0KE7979,1: POKEP-2, 0:NEXTI <91 > 

315 PRINT" { DOHH RVSOH RIGHT2 BLUE ! JOY { SP ACE >LE<B 
LACK ! MBLUfini { RVSOFF BLACK SPACE2 !<&{ D0HH LE£T!(\ 
":FaRI=lTO8:FaRT=lTO2B0: NEXT: POKEP-2, 19B <28> 

316 POKE38744 , : P0KE3B76A , B * PGKESB23 , 32 5 P0KE8B45 

, 32i POKEB024 ,2: PDKEB046 ,3: FDRT=1 T02BB: NEXT <247> 

317 POKEBB24,32:P0KE8B46,32 <22S> 
31G POKE8B23,0:POKE8045,1: POKEP-2, 0:NEXTI <223> 

319 PRINT" { DOHH RVSOH RIGHT2 BJME! BUTTON {SP4C£2> 
t { RVSOFF BLACK SPACE2 !&{ DaHH LEFT !Pt{ RIGHT6 !J{UP 
LEFT !B" : FQRT=lTQBBBi NEXT <1B5> 

320 PDKEP-2,240tFGRI-0TO5)POKEa090+I,9:POKEP-l ,1 

5-2*1 sPOKE38810-f-I,B <58> ■ 

321 F0RT=lTO2BiNEXT:POKE8B9B+I,32tNEXTI <213> 

322 POKEP-2 , 23B : PGKEP- 1 ,15t POKEB096 , 32 : POKEB IIB, 
fl6iFORT=15T085T£P-. 1 sPOKEP-1 ,T: NEXT < 120> 

330 PRINT"ttföä£ Ü0HH22 RIGHT4 R 1/ SOW> PRESS t SPACE} 
BUTTON ! { RVSOFF ÜP ! " < 153> 

331 IFPEEK (37 15 1 > < 10BTHENPOKEP-2,0J POKEP-4 ,0* POK 
EP-1,I5:G0T0333 <212> 

332 POKE646,INT<RND(.)«7)sGOTO330 <93> 

333 P=36B79:POKEP,104:PGKEP-1B,242:PRINT" ICLEAR 
RVSOH BLACK SPACE SE> VERYTHIN ' {.SP ACE ! CLEAR t SPdCC , 
!?7{SPACE2 RVSOFF !" <163> 

334 GETB*i IFB*=" Y"QRB»="J"THENPRINT" {HHITE RIGHT 
2 SO! KM. { SP ACE SRI AMBO {. SPACE ! -I SP ACE SB!ABY{ SPA 
CE7 DOHH YELLOH RVSOH SPACE SG!Q { SPACE Sf>OR {SP >A 

CE SI } T { SPACE ! ! { RVSOFF! " i GBTQ337 * <66> 

335 IFB*="N"THENRUN <17> 

336 PQKEP-3,234jP0KEP-3,BsGGTG334 <189> 

337 PRINT" { DOHH BLACK RVSOH SPACE SP SL SE SA SS 
SC SPACE Si SO_ SA SD SPACE SP SA SR ST. SPACE Sl . 

< 33 - CÄ^SOFFJ " : NEW < 136> 

ENDE DES LISTINGS 



♦ ♦♦ Teil 3 ♦♦♦ 



VC20 LISTING + CHECKSUMMEN (V Vl.B) 

P=36B79 s F=3B720 i BD=9 j LV=6B : POKEP , 8 : POKEP-1 ,15t 
PRINT" { CLEAR ! " i TI*="B00000" <1B2> 

1 U1=7B59(U2=7976:U3=B114»U4=7761 <64> 

2 IFPEEK <37151>=62THENPRINTTAB<24S>"{fi!!^W MITE 
! 5 {SPACE} T {. SPACE ! Q { SP ACE! P t SPACE ) ! < R VSOFF ! ":WAIT 
37151,126,62 <120> 

3 FGRI=B2BTGB6BiREADBtP0KEI,B<NEXT <31> 

4 DATA24, 169,, 237, 17, 145, 41, 127, 141, 13, 3, 169,, 14 

1 34 145 24 ^233^ 
5*DATA237, 32, 145, 24, 1B9, 13, 3, 74, 74, 170,169,255,1 
41,34,145,96 < 197> 

6 POKEP, B: POKEP-10, 255) PRINT" tQLEAR RIGHT2 MITE 
!G{ SPACE13 YELLaH y\-{ 8LÜE mHHNt YELLOH >L" i <229> 

7 PRINT"L{Blüg>NPNNNNNNNNNNNNN< yEf.f.0W> Lt «JC/*r2 H_ 
HJTE!*{ßIGHT2. YELLOH !L{ RIGHT3 yi.t PURPLE RIGHT 16 !5 
{YELLOH!l.CRED!*Z&' l"s <4> 
B PRINT" { YELL0H !1,{ R1GHT3 !L.{ PURPLE R1GHT10 !T { YELL 
qH!V. {GREEHy/BH23{ YELLOH !L.{ RIGHT3 !L{ CYAH ) C 3 {RIGHT 

2 YELL0H y\-{ BLUE yU{ YELLOH !\-{ RlGHT4 }\-{ RlGHT2 WHITE 

>>" <253> 

9 PRINT" { YELLOH !L.< RIGHT3 !L{ CYAH !\*{ RIGHT4 YELLOH 
yL{ RIGHT4 yi-{ RlGHt5 yL{ RIGHT2 !LL{ RIGHT 6!L.{ 8LUE !N{Y. 
ELL0H !L.{ RIGHT2 y\^{ RIGHT HHITE ! +*~" <6fl> 

10 PRINT" { YELL0H !L.{ RIGHT2 PURPLE !S{ YELLOH !i.{ RIGH 
T6Jl.{ PURPLE !Q{ RIGHT3 YELL0H !l.{ RIGHTS yL{ RIGHT2 Pü 
RPLE !TiYELL0H!Ll RIGHT6 !L.{ PURPLE !Ri RlGHT3 YELLOH ! 

L" . <2B3> 

11 PRINT"L{ R.TCwr3 3Lt g/.f/E >NNN< yCLf.QW 3LC WJGWr2 3LtC 
YAH !11{ R1GHT2 YELLOH !L{ RIGHT HH 1TE !*S{ RVSQH ! r {RV 
SOFF RIGHT YELLp H!L.{ RIGHT6 !i,{ RIGHT3 H.{ CYAH !\^{YE 

LLOH RIGHT2 !L." <B3> 

12 Pmm"\-{ R!GtiT& !\-{ RIGHT3 !L.{ PURPLE yQ{ RIGHT3 YEL 
LOH!L" <62> 

13 FRINT , 'L< Bf.f/C >NNN{yEf.lOtf>LCffJC tfT J PURPLE!3{ YEL 
LOH!L{PURPLE7R{YELLOK RIGHT3H." "" <251> 



14 PFtim " L { CY AH ! tl { YELLOH RIGHT! L {RIGHTS PURPLE ! 
T{ YEllOH yL{ RIGHT4 !L.{ RIGHT HH 17 E !t>7 { RVSOH ! : { RVSQF 
£ YELLOH RIGHT 1L{ CYAH !\^ { RIGH T, YELLOH !\-{ 8LtiE yNNH 
NNNN-C yg£f.0*/ >L{ fiJgtfT3 >L" 

15 PRlHT"l~{ PÜRPLE !Q{ RIGHT14 YELLOH !L." 

16 PRlNT"]-{ PÜRPLE yfit RIGHT14 YELLOH H." 

17 PRINT"H /»GHTi5 ?L< Bf-t/E ?NNNN{ yEf.£OH >LL{ gH/C >NN 
{ YELLQU y\-{ SPACE yL{ BLÜE ymiNNNNNNH{ YELLGH !}-{ PURPLE 
1S{ RZGHT4 YELL0H !LL{R1GHT!"'. 

1B PRINT" { RIGHT14 PURPLF H { RIGHT UHITE y\J»{ RJGHT 
YELL0U >\JLi PURPLE !Q{ RlGHT16 UHITE! VXI R1GHT YELLOH 
Jt"; 

19 PRINT"L{ P»fiPLE >R{ flJgHT5 yE/.f.Qtf ?L<: SH/E >NNNNNN£ 
YELLO U!L.{ RIGHT6 yi,l.{ BLUE lHtmHHH{ YELLQH !l.{ SPACE6 !L. 
{BLUE!NNHUNH" i 

20 P0KEBlS5,12tP0KEF+BiB5,7 

21 K=7726:N=774a:L=B:M=l(Q=K!G0Ta4B 

22 SYSB28:X=PEEK(7Bl)BlFLV~VAL(TI*)<=0GOTQ100 

23 IFX=B0RX=BTHEN42 

24 1FBB=BTHEN29 

25 IFX=9THEN5=S:D=-22sGOTO50 

26 IFX=40THENS=9tD=lsGOTD5B 

27 1FX=10THENS=10:D=22:GGTO50 

28 IFX=12THENS=ll:D=-liGDT05B 

29 IFX=lANDPEEK(K-22)=32THENK=K-22: IFL=4THENL=A: 
M=7iG0TG4B 

30 IFX=lTHENL=4iM=5«GGTQ40 

31 IFX=32ANDPEEK (K+l ) =32ANDPEEK (K+23) -32THENK=K+ 
1 s IFL>4THENL=4; H=5: GOTD4B 

32 IFX=32THENL=OlM'=ltGOT04B 

33 IFX=2ANDPEEK(K+44>=32THENK=K+22s IFL=BTHENL=2t 
M=3: GGTO40 

34 I FX=2THENL^B: M= 1 ! GOTG4B 

35 IFX=4ANDPEEK (K-l) =32ANDPEEK (K+2I >=32THENK=K-i 
: IFL>4THENL=4»H=5:GGTaiB 

36 IFX=4THENL=2E«"=3sGaT04B 
39 GGT022 

4B PDKEQ , 32 : POKEQ+22 , 32 1 POKEK , L : PGKEK+22 ,Hi POKEK 
+F , 5 ! POKEF+K+22 ,5:1 FK=QTHEN42 

41 Q=K : POKEP-2, 240 tl POKEP-2, 

42 IFBG<BTHENBD=B 

43 PRlNT"{ WOtfE RVSOH YELLOH RIGHT18 DOHHt l !"i BOj 
"I LEFT4 Ü0HH4 ! " 1 LV-VAL (RIGHTS tT I* ,2> ) ) " ttEFT BLA 
CK SPACE !" 

45 IFK=7704THENQ0 

46 IFK^B137THENB2 

47 H=RND<.>:1FH<.09THENB3 
49 GOT022 

5B E=D i BG=BO- 1 t POKEP-2 , 1 56 

51 I=PEEK<K+E>tIFK>32THEN5B 

52 PaKEK+E,StPOKEK+E+F,llPDKEP-2,INT(RND(. ) #30) + 
16B: FGRB=lTO10i NEXT 

53 PaKEK+E,32:E=E+DlG0T051 
58 IFK8THENE=E+DsG0TO51 

60 IFI=17ORI=19THENSC=SC+5iGOTQ70 

61 IFI=lBORI=2BTHENSC=5C+5sGaT071 

62 IFI>27ANDK31THENSC=SC+1B:GGT075 

63 PGKEP-2,0: PGKEP-4,25BsFaRI=ITD20iNEXT»POKEP-4 
,0:GOTO22 

70 PGKEK+E,32sP0KEK+E+F+22, 1: POKEK+E+22,46s POKEP 
-2,240:FGRI=lTO50sNEXT:POKEP-2,0:GDTO22 

7 1 POKEK+E , 46 : PGKEK+E+F , 1 s PGKEK+E-22 T 32 1 PGKEP -2 , 
240: FORI=1TD50j NEXT: PDKEP-2,BiG0T022 

75 IFK+E<7799THENPRINT"tHWf£>"SPC(93> "{RED! {SPA 
CE VOHH LEFT2 ! ! tt " : PQKE7774 , 54i POKEP-2 , B: EOSUB1 50 
: 60TD22 

76 IFK+E>7966THENPRINT"«£0ffE ÜOHH4 ! " 5PC ( 1 99 > " <YE 
LLOH ! { SPACE DOHH LEFT2 ! !»":P0KE796B.34:PQKEP-2, 
: BOBUB 150: B0T022 

77 PR I NT " {H DHE > " SPC (210)" { PURPLE ! {SPACE DOHN LE 
FT2 ! '.#" : P0KE7B91 ,34: PGKEP-2,0s G0SUB15B» G0T022 

SB PRINT" { CLEAR RVSOH YELLOH ! "3PC( 1B1) "CNEXT<SP4 

C£>LEVEL1 " : GDSUB9B: BD=5: l_V=LV-5: TI *=s"000000" i GOT 

06 

B2 POKEP, 1B: POKE7704, 32: PRINT" {HOHE. HHITE D0HH9 ! 

"SPC <23B) " J SPACE2 DOHH LEFT2y YZ" i G0SUB9B: GQT022 

93 IFH>.07THENUZ=U2:6OTQ87 

B4 IFH< . B7ANDH>. 04THENUZ=U1 i GOTOG7 

85 IFH<.BflANDH>.B2THENUZ=U3sGQTOB7 

86 UZ=U4 

87 P0KEUZ,2B:POKEUZ-22, 19sPDKEUZ+F,4 

88 UZ=UZ-1: IFPEEK (UZX32THEN2BB 

89 PQKEUZ , 1 3 : POKEUZ +F , 2 : POKEP-2 , 200s POKEUZ , 32 1 PD 



<56> 
<40> 
<46> 



<44> 



<14> 



<170> 

<BB> 

<251> 

<115> 

<83> 

<220> 

<15B> 

<163> 

<221> 

<129> 

<121> 
<102> 

<235> 
<I2B> 

<26> 
<3B> 

<15B> 

<80> 
<170> 

<244> 
<141> 
<S2> 



<203> 

<239> 

<17> 

<181> 

<I8B> 

<15B> 

<253> 

<181> 

<56> 

<34> 

<21B> 

<157> 

<126> 

<B> 

<31> 

<127> 

<22B> 

<76> 
<128> 

<93> 

<43> 

<24i> 

<25B> 

<245> 

<205> 

<234> 

<212> 



Computronic 



L*l* 



KEP-2,0iGDTaBB <143> 
70 FORT=lTG3-.FORI = 12BTP254STEP3:PGK£F-4,IiPaKEP- 

3,TsNEXTI,T:POKEP-4,0^PGKEP-3,ßsRETURN <1B7> 

100 POKEF-3, 245s PQKE646, INT <RND(. >*7) SPRINT" {. HÖH 
E>"SPC(1S1> " { RVSÖH > rGflMEC SF4CE >aVER3 "i PQKEF-3.0 <36> 

101 IFSOBTHENPRINT" t tiOME RIGHT6 RVSOiT } SCORE l ";S 

C <40> 

102 IFPEEK<37151X100THENRUN <9S> 

103 GOTO1B0 <162> 



158! POKEP-2,190:FÖRT=15TO0STEP-. lsPDKEP-1 .TlNEXT 
:POKEP-2,0aFGKEP-l, 15: RETURN <16B> 

200 IFPEEK<U2)>7THEN22 <227> 

201 POKEK, 32: POKEK+22 , 46: P0KEK+22+F , 1 : GOSUB150S B 
GTO10B <44> 

ENDE DES LISTINGS 

Ende des Listings 



Tron 




Mit diesem Spiel präsentieren wir Ihnen einen absoluten Knüller 
für den kleinen Commodore. Versetzen auch Sie sich in die Rolle 
eines Balles und fechten Sie den Kampf Ihres Lebens aus, so wie 
die von dem Spiel gefesselten Mitglieder der Computronic-Redak- 
tion! 



In 20 Runden wird der größte Mauerkönig 
ermittelt. Zu Spielbeginn werden Ihnen 
natürlich noch keine Mauern auffallen, 
weil gar keine vorhanden sind. Die müssen 
Sie nämlich erst mit Ihrem Ball errichten. 
Also setzen Sie Ihren Ball in Gang, damit 
Sie mit der Mauer, die Sie hinter sich her 
ziehen, den Gegner festsetzen körinen. 
Leider kann es bei Ihrem Eifer auch passie- 
ren, daß Sie vor die eigene Wand laufen, 1 
und somit eine der 20 Runden verlieren. 
Vorsicht ist auch in Bezug auf den Spiel- 
feldrand geboten, Bei diesem Game be- 
deutet eine Kollision mit dem Rand eben- 



falls das Ende. Auf dem Bildschirm wer- 
den die beiden Spielhälften geteilt, so daß 
oben und unten jeweils der äußerste Rand 
gezeigt wird. Zur Mitte hin geht der Spiel- 
bereich natürlich für beide Spieler weiter, 
es sei denn Ihr, Gegner hat Ihnen als per- 
sönliche Note eine Wand vor die Nase ge- 
setzt. Sollte Ihnen der auserwählte Spiel- 
partner nicht mehr das Wasser reichen kön- 
nen, versuchen Sie doch Ihr Glück gegen 
den Computer. Der ist garantiert ein 
gleichwertiger Partner. Gewonnen hat am 
Ende natürlich der, der von den 20 Runden 
die meisten für sich entscheiden konnte. 



Zur Eingabe: 

Tippen Sie den ersten Teil ab und spei- 
chern Sie ihn ganz normal. Nun geben Sie 
das Maschinensprach-Programm über den 
C- 16 Checksummer OVM ein. Als Check- 
summer Startadresse geben Sie am besten 
die Zahl 4097 ein. Den zweiten Teil spei- 
chern Sie folgendermaßen ab: 
S„MC",1,3800,3FFF. Ein verändern des 
Namen ist nicht möglich, da sonst der 
Computer diesen Teil nicht lädt. Der zwei- 
te Teil wird automatisch vom ersten einge- 
laden. Das Programm arbeitet auf Kasset- 
te, wie auch auf Diskette. 



C-16 LISTING + CHECKSUMtlEN (OC V1.B> 

10 FDRI = 1536TG1 566 : READA*: POKEI , DEC <A*) i NEXT <142> 

11 IF PEEKU74)=1 THEN 20 <245> 

12 PDKE 1536+2, B <49> 
•13 PDKE 1536+4, S <63> 
14 POKE 1536+6,8 <78> 
20 SYS1536 <141> 
30 P0KE56,39sP0KE55,255:CLR <252> 
48 COLnR0,l;COLrjRl,2,5«COLDR4,2 T S <96> 
50 REM VARIABELN <23> 
60 REM ANFANGSBILD <145> 
70 BCNCLRiSVSDEC ( "3E30" ) jSYS1336B:SVSDEC< "3F20" > 

:VDL4 <I3> 

B0 POKE652B6,PEEK(6S2B6)flND239 <195> 

90 FORI=3TÜ20:CHAR1,1 , I , " CS43SJ "iNEXT <172> 

100 CHRR1 ,10,5," ( SP2« " " <127> 



110 CHAR1,10,6," 

120 CHAR1,1B,7," 

130 CHAR1, 10,8," 

140 CHAR1,10,V," 

150 CHAR1,10,10, 

160 CHAR1, 10,11, 

170 CHAR1,10,12, 

1B0 CHAR1,10,13, 

ACE4 SP3" 

190 CHAR1,10,14, 

200 CHAR1,10,15, 

PACE3 SP>" 

210 CHAR1, 10, 16, 

220 CHARl,10,i7, 

9B7(SP>" 

230 CHARl,lfl, 18, 

240 CHAR1,1,22," 

2SB CHARI.1,23," 

LAYERCSP4CE2J (2) 



<SP SPAC E13 SP>" 

{ SP SPACES ! TELE5QFT Ü SPACE5 SP>" 

{ SP SP ACE 18 SP>" 

( SP SPACES >PRE5ENT {. SPACE6 SP>" 

"tSP SPACE1& SP}" 

"(SP SP4CC7 >TR0N< SP4CE7 SP}" 

"<SD SP ACE19 SP>" 

" {SP SPACES PRODUCED {SPACE! BY tg_£ 

" <££ SPACE18 5D > " 

" tSP SPACE 3 >THQMASCSPACE>S£Bm<S 

"ISP SPACE 18 SP}" 
"<SP>COPYRIBHTt Sf'/!CE >MAY<: SP/ICE >l 

"{ SP2g >" 

I SD38 J " 

tSD SPACE3 y ( 1 > J SPACE yONEl SPACE JP 

{ SPACE yTV)0<. SPACE >PU*Y£.nt SPAC£3 S 



<1Q0> 

<24> 

<214> 

<190> 

<113> 

<22> 

<149> 

<203> 
<1B5> 

<217> 
<221> 

<B1> 

<101> 

<2S4> 



<3> 



Computronlc 



A3 



&fi 



260 CHARI .1.24," tSD38>" 






<33> 




760 SOUND3,65B+I 1 INT<I*I/ r 30000> 








<JB5> 


270 P0KE65286,PEEK (65286) GR16 






<124> 




770 NEXTI 








<25> 


280 REM TON 






<U7> 




7B0 IF(R1+R2) M9THEN800 








<5B> 


290 D=D+1: IFD=750THEND=1:GOTG56O 






<176> 




790 GDTO350 








<103> 


300 GETA*: IFA*=" "THEN2O0 






<240> 




B00 SCNCLRs SYSDEC ( "3E30" ) 








<203> 


310 IFfi*="l"THENP=l:GOTO340 






<208> 




G10 P0KE652B6,PEEK (65286) AND239 








<160> 


320 IFA*="2"THENP=2:G0TQ34ß 






<235> 




S20 FORI=3TO20! CHARI ,1,1," LSA381 " iNEXT 






<137> 


330 GaTO280 






<160> 




830 PÖKE652B6,PEEK(65286>aR16 








<174> 


340 REM VARIABELN ZURUECKSETZEN 






<243> 




B40 IFP=1ANDR1>R2THENCHAR1 ,11 , 1 1 , "PLAYER CSA> KSA 




345 R1=0:R2=0 






<144> 




JHAVECSÄJWIN" 








<13B> 


350 SYBDEC < "3E90" > : SYBDEC < "3EDC" ) : BYSDEC ( "SECA" > 






B50 IFP= I ANDRKR2THENCHAR1 ,11,11, "COMPUTER CSAJ HA 




: SYSDEC ("3EF8") 






<220> 




VE{S4>WIN" 








<13> 


360 GOSUB1000 






<152> 




860 IFP=1ANDR1=R2THENCHAR1 , 12, 1 1 , "NOBODYCSP/ICEM 




370 FORI=lTa5:SOUNDl,900,5sFGRT=lTO10B:NEXT:NEXT 


<32> 




S CSPXCf >BETTER" 








<5> 


380 REM HAUPTPROGRAMM 






<57> 




B70 IFP=2ANDRt >R2TH£NCHAR1 , 11 , 1 1 , "PLAYER tSjfl> £ ISA 




390 SYBDEC < " 3E50 " ) : POKE220 , JOY C 1 > : SYSDEC ( " 3E60 " > 


<224> 




}HAVEtS/1>WIN" 








<172> 


400 IFPEEK (DEC < "3FFA") )=1THEN660 






<249> 




BS0 IFP=2ANDRKR2THENCHAR1 , 1 1 .11. "PLAYER CS/!} 2 iSA 




410 IFP=1THEN450 






<14> 




}HAVEtS>1JWIN" 








<227> 


420 SYBDEC i "3E68" ) : PQKE221 , JOY (2> : SYSDEC ( "3E77" 1 


<78> 




B90 IFP=2ANDR1=R2THENCHAR1 ,12,1 1 , "NOBQDV {SPXCf > I 




430 IFPEEK (DEC("3FFB") >=1THEN730 






<252^ 




S HSPACEy RETTER" 








<39> 


440 GDT0530 






<5> 




900 SGUND3,0,3 








<25> 


450 REM 1 SPIELER 






<22> 




910 FDRX=BT(HSTEP-I 








<194> 


460 Z= I NT <RND < I ) * 1 ) s I FZ=2THEN500 






<19> 




920 VOLX 








<3B> 


470 SYBDEC ( "3E68" ) : SYSDEC < '^FSA" > : SYSDEC ( "3E7A") 


<249> 




930 FÜRS=3T05 








<32> 


480 IFPEEK £DEC ( " 3FFB" ) > = I THEN730 






<4ä> 




940 D=S*9+100 








<160> 


490 GOTO530 






<55> 




950 S0UND1,D,3 








<151> 


500 Z=INT(RND<1>*4) 






<127> 




960 SOUND 1 ,D+1,3 








<215> 


510 Z=1+2»Z:PDKEDEC("3FF9") ,Z 






<142> 




970 NEXTS,X 








<217> 


520 GOTO470 






<96> 




980 VOL4 








<26> 


S30 REM 






<163> 




990 FORT=0TG1000:NEXT:GGTQ60 








<5> 


540 SOUND 1 ,400,1 :SaUND2, 500,1 






<96> 




1000 REM BILDSPIEL 








<44> 


550 GC]TO380 






<127> 




1010 SCNCLR 








<221> 


560 BOSUB 1000: REM DEMO 






<154> 




1020 PGKE652B6,PEEK<652B6)AND239 








<114> 


570 BYSDEC ( "3E90" ) : SYSDEC < "3EDC" ) i SYSDEC ( "3ECA" ) 






1 030 CH AR 1 , 5 , , " PLAYER C SPACE5 1 " 








<210> 


s SYSDEC ("3EF8") 






<1B5> 




1040 CHAR 1,23,0, "ROUND : " 








<84> 


5B0 BYSDEC ( "3E50" > ! SYSDEC ( "3E6B" J 






<1B5> 




1050 CHARI, 3H,0,STR*(R1) 








<179> 


590 IFPEEK (DEC ( "3FFA" ) >=1THEN650 






<166> 




1060 CHARI ,0,1." iSF48>" 








<46> 


£00 SYSDEC ("3E68") : SYSDEC ( "3F5A") t SYSDEC ("3E7A") 
610 IFPEEK i DEC ( "3FFB" > ) =1THEN650 


<124> 
<I96> 




1070 CHARI, 0,ll,"{i 
1080 CHARI, B, 12, "(! 


JF4*> " 








<23?> 


3F4«J " 


620 S^B+1 






<1B7> 




1090 CHARI, 0, 13, "<SF40J" 








<17> 


63(8 FORT=1TO10:NEXT 

640 GETA*sIFA*=""THEN5B0 






<135> 
<105> 




1100 CHARI ,0,23," t! 
1110 CHARl,5,24,"Pt 


1F401 " 








<33> 
<57> 


-AYER{SPXICEJ2" 


650 B=0:D=0:GaTQ60 






<BB> 




1120 CHARI, 23, 24, "ROUND:" 








<132> 


660 REM TOD SPIELER 1 






<160> 




1130 CHAR1,30,24,STR*(R2) 








<130> 


67B R2=RZ+1 






<1> 




1140 SYSDEC ("3C9E") i SYSDEC ("3CA6" ) 








<185> 


680 FORI=0TO3605TEP 20 






<232> 




1150 POKE65286, PEEK< 65286 >OR 16 








<239> 


6913 SQUND3, 650+1, INT (1*1/ 30000) 






<115> 




1160 RETURN 








<Z6> 


700 NEXTI 






<210> 




1170 REM MC-DATAS 








<B5> 


710 IF(R1+R2> >19THENB00 






<243> 




IIB« DATA1B,A9,01,A2,01,A0,01 ,20,BA 








<150> 


720 GGTD350 






<32> 




1190 DATAFF,A9,02,A2,1B,A0,06,20,BD 








<196> 


730 REM 






<1B7> 




1200 DATAFF,A9,00,20,D5,FF,60,EA,EA 








<107> 


740 R1=R1+1 






<64> 




• 1210 DATA4D,43,EA T EA 








<187> 


750 FORI=0TO360STEP 20 


>3BB0 


00 


<46> 
BB 00 


00 


ENDE DES LI ST INGE 
B0 00 00 B0 : : E8 


>39BB FA FF FF 


FF FF 


FF 


FF 


FF :s98 




IfiföWl;:*»;» 




>3BBS 


00 


00 00 


00 


00 00 00 BB * s F0 


>3990 FF FF FF 


FF FF 


FF 


FF 


FF !SA5 




>38C0 


FF 


FF FF 


FF 


FF FF FF FF ; : D4 


>399B FF FF FF 


FF FF 


FF 


FF 


FF :rAD 


MC-LISTING MIT CHECKSUMMEN QVM1B 


>3BCB 


FF 


FF FF 


FF 


FF FF FF FF : : DC 


>39A0 00 00 00 


00 00 


00 


00 


00 : : D9 




>38D0 


FF 


FF FF 


FF 


FF FF FF FF : s E4 


>39AB 00 BB B0 


BB 0B 


00 


00 


00 :sEl 


>3S0ß FF FF FF FF FF FF FF FF : : 14 


>3BDB 


FF 


FF FF 


FF 


FF FF FF FF i t EC 


>39B0 00 BB 00 


00 00 


00 


00 


B0 : t E9 


>3BB8 FE FF FF FF FF FF FF FF s t 1B 


>38E0 


00 


00 00 


00 


ßS 00 00 03 : s 18 


>39BB 00 BB BB 


BB 00 


00 


00 


00 JE Fl 


>3810 FF FF FF FF FF FF FF FF i : 24 


>38E8 


00 


BB 00 


00 


00 00 00 00 t : 20 


>39CB FF FF FF 


FF FF 


FF 


FF 


FF s : D5 


>3816 FF FF FF FF FF FF FF FF ; : 2C 


>38F0 


00 


00 00 


00 


80 00 00 00 : : 28 


>39C8 FF FF FF 


FF FF 


FF 


FF 


FF » : DD 


>3820 013 00 00 00 00 00 00 09 s s SB 


>38FB 


00 


00 00 


00 


BS 00 00 00 i : 30 


>39D0 FF FF FF 


FF FF 


FF 


FF 


FF j ; E5 


>382S 24 04 04 BB 04 00 BB 00 i : AC 


;39BB 


FF 


FF FF 


FF 


FF FF FF FF 


:; 15 


>39DB FF FF FF 


FF FF 


FF 


FF 


FF is ED 


>3B3B 00 00 00 00 00 00 00 00 : s 6B 


>39BB 


FA 


FF FF 


FF 


FF FF FF FF 


i 5 IS 


>39E0 00 00 00 


00 00 


00 


00 


00 : ! 19 


>383B 04 00 00 00 00 00 00 00 ; s 74 


>39iB 


FF 


FF FF 


FF 


FF FF FF FF 


:s25 


>39EB 00 00 00 


00 00 


00 


00 


00 :s21 


>3B40 FF FF FF FF FF FF FF FF :s54 


>391B 


FF 


FF FF 


FF 


FF FF FF FF 


S :2D 


>39F0 00 00 00 


00 00 


00 


00 


00 « J 29 


>3B4S FF FF FF FF FF FF FF FF : : SC 


>3920 


00 


00 00 


00 


00 00 BB 0B 


;:59 


>39F8 00 00 00 


00 00 


00 


00 


00 EI 31 


>3850 FF FF FF FF FF FF FF FF : : 64 


>392B 


80 


00 00 


00 


00 00 00 00 


::E1 


>3A0B 3C 42 BD 


B5 85 


Sl 


42 


3C : : 02 


>3858 FF FF FF FF FF FF FF FF s : 6C 


>393ß 


00 


00 00 


00 


00 B0 00 0B 


: s69 


>3A0B BB 7F 7F 


7F 7F 


7F 


7F 


7F : t 9F 


>3860 00 00 00 00 00 00 00 00 : : 99 


>3938 


00 


00 00 


00 


00 00 00 00 


: :71 
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Jetzt gibt es einen Checksummer für WSC« Programme! 

Nachdem wir in den letzten Ausgaben ständig versucht haben, die Eingabe von Programmen zu erleichtern, machen wir diesmal mit 
dem MC-CHECKSUMMER einen großen Schritt nach vorne. 



"Warum schon wieder einen 
Checksummer ? 

Sicherlich werden sich einige Le- 
ser fragen, warum wir schon wie- 
der einen neuen Checksummer 
vorstellen und wie es jetzt mit 
dem alten weitergeht. Die Ant- 
wort ist relativ einfach: Da wir in 
den letzten Ausgaben verstärkt 
Maschinenprogramme abge- 

druckt haben, benötigen wir ein 
neues Verfahren, um auch diese 
Programme mit einer Checksum- 
me zu versehen. Das Ausdruck- 
verfahren von Basic-Listings wird 
nicht verändert. Hier wird auch 
weiterhin der erprobte Check- 
summer OV 2.0 seine Dienste 
tun. 

Der neue Checksummer OVM 

1.0 

Wie schon erwähnt, dient der 
neue Checksummer ausschließ- 
lich zum Eingeben von Maschi- 
nenprogrammen. Diese konnten 
zwar bisher relativ kompakt als 
sogenanntes HEXDUMP ausge- 
geben werden, ließen jedoch kei- 
ne Möglichkeit für eine oder 
mehrere Prüfsummen offen. 
Dies ist bei dem neuen Check- 
summer völlig anders. Die Bedie- 
nung und Arbeitsweise der neuen 
Version ist weitgehend mit dem 
eingebauten Maschinensprache- 
monitor TEDMON identisch. 
Die einzige Ausnahme ist, daß 
nach der Eingabe einer HEXZEI- 
LE keine ASCII-Zeichen, son- 
dern eine sogenannte Checksum- 
me bzw. Prüfziffer ausgegeben 
wird. Achtet man beim Eingeben 
der Zeilen darauf, daß diese Prüf- 
ziffern mit den abgedruckten 
Prüfziffern identisch sind, so 
kann praktisch kein Tippfehler 
mehr übersehen werden. 

Hinweise zum Einsatz des 
neuen Checksummers 

Um den Checksummer OVM 1.0 
einzugeben, sollten Sie unbedingt 



den Basjc-Checksummer OV 2.0 
verwenden. Vor dem Start, durch 
den Befehl "RUN", sollte das Pro- 
gramm auf jeden Fall mit SA- 
VE"OVM1.0 K auf Kassette oder 
Diskette abgespeichert werden, 
da sich das Programm unter Um- 
ständen selbst zerstören kann. 
Wer sich die Arbeit des Eingehens 
völlig ersparen möchte, kann den 
neuen Checksummer auch unter 
den folgenden Bestellnummern 
beziehen: 

OVM LOK Kassette 15 DM 
OVM 1.0D Diskette 20 DM 

Nachdem man den Checksum- 
mer eingegeben und mit RUN ge- 
startet hat, verlangt dieser die Ein- 
gabe einer Adresse. Diese Adresse 
gibt an, ab welcher Speicherstelle 
der Checksummer im RAM abge- 
legt werden soll. Diese Adresse 
mußte flexibel gestaltet werden, 
da sich sonst einzugebende Ma- 
schinenprogramme eventuell mit 
dem Checksummer überschnei- 
den könnten. Der zweite Vorteil 
ist, daß sich ein verschiebbarer 
Checksummer gleichermaßen für 
den C16 sowie den PLUS 4 eig- 
net. Zu. beachten ist hier nur, daß 
sich die eingegebene Adresse in ei- 
nem zulässigen Bereich befindet: 
Beim C16 von 4097 bis maximal 
12680 

Beim Plus 4 von 4097 bis maximal 
32060 

Welche Adresse man schließlich 
wählt, bleibt jedem selbst überlas- 
sen. Wichtig ist nur, daß der Be- 
reich 688 Bytes über der Adresse 
nicht vom einzugebenden Pro- 
gramm benötigt wird. Belegt bei- 
spielsweise das einzugebende Pro- 
gramm den Bereich von 
$1000-52000 (4096-8192), so 
konnte man für den Checksum- 
mer die Adresse 9000 wählen. 
Um Ihnen am Anfang die Wahl 
des Speicherbereiches etwas zu er- 
leichtern, werden wir auch ent- 
sprechende Tips in den Pro- 
gram mbeschreibungen unter- 
bringen. 



Nachdem Sie eine Startadresse 
eingegeben und die RETURN- 
Taste betätigt haben, wird der 
Bildschirm mit einem undefinier- 
baren Zeichengewirr beschrie- 
ben. Keine Angst, dies ist normal 
und dient zum Umrechnen eini- 
ger Sprungbefehle. Kurz danach 
erscheint die eingegebene Start- 
adresse sowie die Endadresse des 
Checksummers. Prüfen Sie jetzt 
noch einmal genau, ob sich diese 
Adressen nicht mit dem einzuge- 
benden MC-Programm über- 
schneiden, 

Ist dies nicht der Fall, so kann der 
Checksummer mit dem angezeig- 
ten SYS ... Befehl aktiviert wer- 
den. Ein ab Adresse 10000 abge- 
legter Checksummer wird bei- 
spielsweise auch mit SYS 10000 
aktiviert. 

Nachdem sich der Checksummer 
mit dem üblichen COPY- 
RIGHT- Vermerk meldet, befin- 
den Sie sich im MC-Eingabe- 
modus. Dies bedeutet, daß jetzt 
die Basic-Befehle nicht mehr aus- 
geführt werden können. Statt des- 
sen stehen dem Anwender nun 
acht neue Befehle zur Verfügung. 
Die Befehle bestehen jetzt nur 
noch aus einem einzigen Buchsta- 
ben und arbeiten ähnlich wie die 
im eingebauten Maschinen- 
sprachmonitor TEDMON. 

M aaaa,eeee 

Dies ist der sogenannte Memory- 
Befehl. Er erlaubt das Auflisten ei- 
nes bestimmten Speicherbereichs 
als HEXDUMP mit einer Check- 
summe pro Zeile. Die Parameter 
aaaa und eeee stehen jeweils für 
Anfangs- und Endadresse des aus- 
zugebenden Bereichs. 

> aaaa bb bb ... 

Dieses ist der eigentliche 

Maschinencode-Eingabebefehl. 
Als Parameter kann die Eingabe- 
adresse sowie eine Folge von By- 
tes (maximal 8) übergeben wer- 
den, Die Arbeitsweise ist mit dem 
herkömmlichen Monitor völlig 
identisch und kann im Handbuch 
zum C16 genauer studiert wer- 



den. Der einzige Unterschied 
zum Standard-TEDMON-Befehl 
besteht darin, daß nach dem Betä- 
tigen der RETURN-Taste am 
Zeilenende eine Checksumme er- 
scheint. Um die Checksumme 
besser von den Bytes der Eingabe 
abzuheben, ist diese "durch zwei 
Doppelpunkte von letzteren ab- 
gesondert. Da dieser Befehl auto- 
matisch beim M-Befehl den Zei- 
len vorangestellt wird, lassen sich 
Speicherbereiche einfach mittels 
der Cursortasten verändern oder 
verbessern. Wichtig ist hier aller- 
dings, jede veränderte Zeile mit 
der RETURN-Taste zu quit- 
tieren, 
P 

Durch diesen Befehl wird die 
Bildschirmausgabe auf einen an- 
geschlossene^ Drucker umgelei- 
tet. Wenn Sie anschließend den 
M-Befehl benutzen, können Sie 
beliebige Speicherbereiche als 
HEXDUMP mit Prüfsummen 
auf Ihrem Drucker ausgeben 
lassen. 

B 

Dieser Befehl stellt das Gegen- 
stück zum P Befehl dar. Die Aus- 
gabe wird wieder auf den Bild- 
schirm umgeleitet. 

L"Name",g 

Dies ist der LOAD-Befehl zum 
Nachladen von Maschinenpro- 
grammen. Die Syntax und Ar- 
beitsweise entspricht genau dem 
TEDMON-Befehl und kann so- 
mit im Handbuch nachgelesen 
werden, 

S "Name",g,aaaa,eeee 
Dies ist der SA VE-Befehl zum 
Speichern von Maschinenpro- 
grammen. Die Syntax und Ar- 
beitsweise entspricht genau dem 
TEDMON-Befehl und kann "so- 
mit im Handbuch nachgelesen 
werden. 

V "Name",g 

Dies ist der VERIFY-Befehl zum 

Prüfen von Maschinenprogram- 
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men. Die Syntax und Arbeitswei- 
se entspricht genau dem 
TEDMON-Befehl und kann so 
mit im Handbuch nachgelesen 
werden. 

X 

Über diesen Befehl verlassen Sie 
den Eingabemonitor und gelan- 
gen wieder in den Basic- 
Interpreter zurück. 
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Achtung ! 

Nach der Ausführung der Befehle 
L, S und V (LOAD,SAVE,VERI- 
FY), befinden Sie sich nicht mehr 
im Checksummer, sondern im 
eingebauten Systemmonitor 

TEDMON. Um den Checksum- 
mer wieder zu aktivieren, müssen 
Sie diesen von TEDMON mit G 
xxxx (xxxx steht für Startadresse 



1 C-16 LIST INS + CHECK9UMMEN (OC VI.8) 

}lfl REM ««♦*###»#»«********** <241> 

2« REM MC-EINGABEROUTINE <2S2> 

30 REM OVM 1.0 <218> 

4E REM <C> FRANK SRALL <194> 

519 REM ***««««4t«»N«C«**»»*w* <25> 

60! REM <2B3> 

70 FOR 1-1630 TO 1702iREAD PtPOKE I,PiNE*T I <248> 
B8 REM *«* VERSCHIEBE ROUTINE *«* . <238> 

90 DATA32.222, 157, 132,216, 133,217,32,222, 157, 140 
,134,3,141,133,3,32,222 <145> 

103 BATA157, 132,218, 133,219, 160,0, 177,216, 145,21 
B,24, 165, 216, IBS, 1,133, 216 <S4> 

110 DATA165, 217, 105, 0,133,217, 2«, 165,218, 105, 1,1 
33, 21B, 165, 219, 105, 0,133 <136> 

120 0ATA219, 165, 21 7, 285, 135,3, 208, 219, 165, 216, 20 
15,134,3,280,212,96,0,0 <199> 

|130 DATA0 <lBi> 

HO REM »*# MC-CODE **# <199> 

150 DATAZ34, 169, 251, 141, 2t ,235, 169,2, 141, 25,255, 
32,216,251,147,17,29,144 <74> 

160 DArA32, 32,67, 49, 54, 32, 77, 67, 45,67, 72, 69,67, 7 
5,83,95,77,77 <215> 

170 DATA69, 02,32, 79,86, 77,32, 49, 40,13,13, 32, 32, 3 
2,32,32,40,67 <B9> 

180 DA TA41, 32, 78,82,65, 79, 75, 32, 66, 82, 65, 76, 76, 3 
12,49,57,56,55 <255> 

170 DATA17, 0,32, 58, 252, 162, 0,134, 243, 32, 207, 255, 
157,0,2,232,201,13 <21S> 

200 DATA20B, 245, 282, 134, 244, 32, 63, 251 ,240, 230, 20 
1,32,248,247,162,7,221,151 <52> 

210 OATA1B, 240, 9, 202, 16, 240, 32, 11, 251 ,56, 176,210 
,234,224,5,240, 2«?, 224 <87> 

220 DATA6, 240, 25, 224, 7, 240, 21, 138, 10,170, 1B9, 160 
,1B, 141, 173, 18, 189,159 <78> 

23B DATA18, 141,172, 18,32,242,17, 109,172,18,141,9 
1,5,169,241,141,21,255 <124> 

248 DATA169, 238, 141, 25, 255, 173, 91, 5, 76, 110,246,1 
76,19,32,91,251,160,0 <58> 

250 DATA32 T 242, 17,176,9,165,241, 143, 161,230, 192, 
8,144,242,32,216,231,27 <173> 

260 DATA79, 143, 0,32,67, 18, 56, 176, 166, 234, 9, 165,1 
61,141,174,18,165,162 <160> 

27B DATA141, 175, 18,32, 216, 251, 13, 32, 77, 67,45, 76, 
73,83,84,73,78,71 <162> 

280 DATA32, 77, 73, 94, 32,67, 72, 69, 67, 75, B3, 95, 77,7 
7,69,78,32,79 <232> 

290 DATAB6, 77, 49, 48, 13, 0,173, 174, 18, 133, 161, 173, 
175,18,133,162,40,176 <5B> 

300 DATA14 ,56, 176, 3, 56, 176, 183, 32,91, 251, 32, 242, 
17,144,6,169,11,133 <29> 

310 DATA241,2B8,14,32,lffl0,251,74,102,241,74,102, 
241,74,102,241, 133, 242, 32 <23B> 

32B DATA225, 255, 243, 13,32,67,18,169,8,32, 15B, 251 
,32,114,251,176,238,8 <70> 

330 DATA165, 161, 141, 174, 18, 165, 162, 141, 175, 18, 32 
,216,251,13,32,69,78,68 <65> 

340 DnTA69, 32, 68, 69, 83, 32, 76, 73, 83, 84, 73, 78, 71, B 
3,32,40,79,86 <HB> 

350 DATA77,41, 13,0,173,174,10,133,161,173, 175,18 
,133,162,40,56,176,152 <138> 

360 DATA32, 216, 251, 13, 77, 67, 45,67, 72, 69, 67, 75, 83 
,85,77,77,69,82 <158> 

370 DATA32, 65, 85,93, 32, 33,0, 169,241 , 141 ,21 6 255, 1 
69,239,141,25,253^04 <135> 

3B0 DATA1S4, 76, 3,128,234,32, 216, 251, 13, 68, 82,85, 
67,75,69,82,32,65 <119> 

396 DA1A75, 84, 73,86, 13, 0,169,1, 162, 4,160,0,32,18 

6,255,169,0,32 __ <196> 

408 bATÄI89 ,'255 , 32,192 ,255 , 162'i i ",32^ 201^255 , 56, I 
76,168,231,169,1,32,93 <224> 

41« DATA23B, 32, 12, 239, 32,216, 251, 13, 66, 73, 76, 68, 



in HEX) oder vom Basic aus wie- 
der mit SYS ... aktivieren. 

So, nun viel Glück beim Einge- 
ben von Maschinenprogrammen. 
Übrigens, wer noch nicht ganz 
mit der Bedienung unseres neuen 
Systems zurechtkommt, kann 
selbstverständlich auch weiterhin 
den eingebauten TEDMON be 



nutzen. Wir hoffen jedoch, daß 
unser neues System OVM 1.0 Ih- 
ren Zuspruch finden und die lästi- 
ge Fehlersuche zumindest stark 
reduziert wird. Schreiben Sie uns 
doch einmal, was Sie von unseren 
Eingabhilfen für gut oder für ver- 
besserungswürdig halten! 



Frank Brall 



83,67,72,73,82,77 

420 DATA32, 65, 73, 84, 73, 86, 13, 0,56, 176,219, 169,0, 

133,241,133,242,141 

430 DATA244,7,32,63, 251 ,248,58,201 ,32,240,247,20 

1,32,240,46,281,44,240 

440 DATA42,201 ,49, 144,43,201 ,71 , 176,39,201 ,59, 14 

4,6,201,65,144,31,233 

450 DATA8, 233, 47, 10, 10, 10, 10, 162, 4, 10,30,241,39, 

242 , 202 , 2B8 , 248 , 238 

460 DATA244, 7, 32, 63,251, 209, 206, 173,244, 7,24, 96, 

104, 104,32,11 ,251 ,56 

47B DATA176, 172, 234, 32,59, 251, 169,62, 32, 210,255, 

32,251 ,258, 160,0,32, 150 

460 DATA2B7, 32, 5, 251 ,200, 192, 8, 144,245,32, 216, 25 

l„58,5B,0,169,B,14t 

490 DATA169, 1B, 160,0,32, 150,207, 141 , 171 , IS, 140, 1 

7B, 18, 174, 170, 18,232,24 

500 DATA 173, 171 , 18, 109, 169, 18,141 , 169, 19,202,209 

,243,200,192,8,144,225,24 

510 DATA173, 169, 18, 101 , 161 ,24 ,101 , 162, 162,0,32,5 

,251 ,96,62,77,88,80 

528 DATA66,76,83,86, 174, 16,208, 16, 123, 17, 163, 17, 

2138,17,0,0,0,0 

53B DA TAB, 0,0, 255 

540 REM 

55B REM *«* ABSOLUTE ADRESSEN • •» 

560 REM 

5 /B DATA 4284,4234,4237,4248,4243 

580 DATA 4246,4249,4278,4299,4309 

59B DATA 4314,4356,4361 ,4378, 4408 

600 DATA 4424,4429,4462,4467,4709 

610 DATA 4717,4720,4723,4723,4731 

620 DATA 4734,4746,4767,4769,4771 

630 DATA 4773,4775,0 

64B PRINT»££4£M EßSÄZ 5RM£3> MASCHINENCODE C££4£ 

CJCHECKSUMMER{ S/ > j4Cg >OVM{ ?P/tp£ , J 10» 

650 PRINT" tDWtf ££*C£Z><C>{£&!££JFRAJ*:<S£d££>BftA 

LL < SPA£E ) 1987 i POHH i " 

66B FRINT"8ITTECg£4C£JGEBEN<:S£4££>SiE<£P£££}NUNt 

SP ACE J DIE Cß PACE ) ADRESSE tgPJCJ-J EIN," 

670 PRI NT "AB < $PACE >DER <$££££} DER C£P£££> CHECKBUMM 

ER iSPACEJ I M QSPACgi 9PE I CHER " 

6B0 PRINT" ABGELEGT iS.PACE.1 WERDEN l SPACE > SOLL I fPflSE 

}•" 

690 PRINT" <DOHm ACHTUN8 t SPACE i ! * » t VOMif l * 

700 PRINT"BEIMCSfViCC>C16{S£_4C£>ZWISCHeNtSP^Ce>40 

9 ? tSP/4CfJUND t S/»4Cg > 1 2680 C SPACE l i " 

710 PRINT ,, BEIM{SP_^}PLUB4{Sf4C£>ZWISCHENt£/MCjE> 

4B97 { SPACE 1 UND t SPACE l 32B6B £S PAC E> ! tgOWWJ H 

720 INPUT "ADRE6SECSP4C£}"|AD 

730 IF AD<4097 THEN RUN 

74B IF AD>32060 THEN RUN 

75B D«AD-4B97lREM DIFFERENZ 

760 PRINT" CC4EM>BITTE{SPa££>EINEN{SP i 4C£>AUGENBL 

ICKtSP£££>WORTENCSMC£J ! " 

770 FOR I» 3152 TO 3152+687 iREAD PiPOKE 1-PiNESt 

T I 

7B0 READ UA i IF UA ■ THEN 858 

790 UA'UA-945 

800 W*-<PE£KSUA+t)«256)+PEEK<UA> 

BIB W^>W+D 

820 FOKE UA+1, INT (W/2565 

B3B PGKE UA,W-< INT < W/256) *256> 

BSB GOTO 78B . 

B50 PRINT" CW^ff gP^CE6?PROSRAi1MtSP>3C£> IST t SPACE i 

E ANGELESEN i SPAC E} • B 

BöS PRINT" CBß««I9JSTARTCS£^C^>MITtS/ ) ( «C£}5Y5"AD 

879 PR l NT " BT hm iSPADE J B£ 1 1 "AD" I SPAC E2 1 ENDE t SPACE 

JBEIs "AD+6S7 

893 SVB 1630, 3152,3152+689, AD 

8VB END 

ENDE DES LISTIN9B 



<171> 

<107> 

<98> 

<251> 

<53> 

<248> 

<10S> 

<139> 

<137> 

<221> 

<206> 

<234> 

<173> 

<2B> 

<193> 

<250> 

<B> 

<B6> 

<2i5> 

<47> 

<18B> 

<52> 

<47> 

<30> 

<136> 

<51> 

<228> 
<197> 

<64> 

<215> 

<111> 

<47> 

<21B> 

<l7i> 

<167> 

<203> 

<129> 

<173> 

<1B4> 

<233> 

<13B> 

<1S> 

<170> 

<13E> 
<246> 

<!&&> 
<27> 

<2S3> 
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Time-Rally 

Einmal um den großen 
Teich! «*«**,*.—**. 

und dann geht's los! Der Wettlauf gegen die Zeit und um 
den Teich kann beginnen. So einfach gemacht und trotz- 
dem die Redaktion mit gefesselt Eins um andere mal ging 
die Redaktion auf Jagd nach der Bestzeit 



Bestzeit, Wettlauf, Teich - kein Mensch 
weiß, was los ist. Wir sagen es Ihnen. Vor 
Ihren Augen baut sich ein See, ein paar 
Häuser und Bäume auf Ihrem Bildschirm 
auf. Am unteren Bildschirmrand können 
Sie die Start- und Ziellinie erkennen. Für 
Sie gilt es jetzt, den See so schnell wie mög- 
lich zu umlaufen. Sollten Sie bei Ihrem 
Sprint gegen einen Baum oder ein Haus 
rennen, ist für Sie das Rennen schon früh- 
zeitig vorbei. Der Flußlauf ist eigentlich 
nur an zwei Stellen zu passieren, doch gibt 
es dabei einen kleinen Trick, der natürlich 
nicht verraten wird. Trotzdem ist es mög- 
lich das Ergebnis unter 600 Zeiteinheiten 
zu halten, Den absoluten Rekord hält im- 
mer noch der Programmierer mit 587 Zeit- 
einheiten. Der beste Redakteur brachte es 
immerhin auf 602. Auf geht's, die Jagd 
kann beginnen! 



„Redest du nicht mehr mit mir? Ick fragte, 
was du davon halst, wenn wir noch eine 
Runde laufen würden ...?" 



Das Listing 

C-16 LISTING + CHECKSUMMEN <GC Vl.Bt 

5 U=777iD=777:P=777;VOL7 

6 CDLaR0,lsGRAPHlCl,lJCOLORl ,4 

7 BOX 1,0,0, 319, 199i BOX 1,159, 171, 161, 199 

8 DRAWl,165,123Tül50,104Tat36,94TO120,93TD100,96 
TO80,97Ta70, 100TO66, 104TO55, 117 

9 DRAW1 ,56, 1 17T054, 125T052, 140TO34, 1481032, 13BTG 
34 , 1 20TO36 , 1 1 0TO30 , 1 00TÜ32 , 90 

10 DR AW 1 , 34 , 80TÜ36 , 70TO 32 , 60TO3S , 40TO34 , 20TO3S , 
10TO39,0iDRAWl ,276, 145T02S5, 140TO299, 148 

15 DRAWt ,53, 141TG1 10, 161TO170, 170TO220, 17070260, 

1 60TO266 , 1 57TD270 , 1 45TÜ276 , 1 45 

20 DRAWt , 271 , 145T0265, 126TO250 , 120TO230, 1 1BTO200 

, 120TO16B, 125T0165, 123 

25 FORI=l TÜ5i CHAR1 ,9,12+1 , " <. SPACE9 1 " , 1 sCHARl , 15, 

16+. 7*1 . " Z SPACE18 1 " . 1 a NEXTI 





/> 



-. <C^- "€> <£> 



<7e> 

<236> 
<135> 

<6> 

<t52> 

<184> 

<96> 

<215> 

<230> 



30 DRAWi ,308,150TO320,153sPfiINTi,67,105 <114> 

35 C0L0Rl,3,5iREST0RE:FDRI=lT09tREADX,YjF=RND<l) 
•9:Y=Y-F <12B> 

40 DRAWI ,X,YTQX-5,Y-5TQX-10 t YTOX-10,Y+5TOX+10,Y+ 
5TOX+10,YTOX,YTÜX,Y+5 <245> 

45 DRAWl,X+10,YTOX+5,Y-5TOX-5,Y-5 <15> 

50 B0X1 ,X-7,Y+1 ,X-3,Y+3sB0Xl t X+4, Y+2,X+6,Y+5: BOX 
l,X-l,Y-7,X+l,Y-5 <237> 

55 PAINTl,X+2,Y-2s NEXTI <24> 

60 C0LORl,6:FQRI=-lTO9 <44> 

65 READX , Y: Y=Y+Fi BRAW1 , X ,Y-lTOX , Y-I5T0X-4 ,Y-1 1 ! D 
RflWl ,X,Y-15TOX+4,Y-ll <187> 

70 DRAWä ,X-5,Y-BTDX,Y-llTOX+5,Y-Bi DRAWI, X-5,Y-4T 
0X,Y-7T0X+5,Y-4: NEXTI <151> 

75 DAT A93, 89, 107, 69, 187, 84,140, 184, 200*24, 170, 10 
2,18,170,67,90,19,24 <175> 

80 DATA14,47 ,38,174,60,163,275,177,60,30,64,62, 
260,111,280,69,290,94 <20> 

85 X=162sY=lB5sZ=3iN=0sSOUNDl,77B,9 <193> 

88 5=J0Y<1) : IF5=„THENLETS=Z <34> 
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90 Z=S»0NZG0T091, 92, 93, 94,95, 96,97, 98 

91 Q=-läW*. SGDTQ99 

92 Q=-1:W=1 :BDT099 

93 Q=. sW=l SGDT099 

94 13=1 sW=l IGGT099 

95 Q=l :W=. »G0T099 

96 Q=l sW=-lsGQTa99 

97 Q=. iW=-llG0TCI99 

98 Q=-liW=-l 

9<? X=X+WsY=Y+GiN=N+l 

100 L0CATEX,Y(IFRDÜT(2)*1THENUB 

105 DRAWl,X,YiG0T0B8 

IIB IFX=159THEN125 

115 C0L0Rl,4iCHARl,14,17 t ,, B00D0a(1MMM«! ! !",t 

12B B0UND1 , 56B, 33 IS0UND2, 660, 33 1(3010200 

125 1FYM60THEN135 

13B GDT0115 

135 C0L0R1 ,8* CMAR1 ,14,2, "ZEIT*" 

MB L*=5TR*(N>iCHARl,lB,2,L* 

145 DD;READX,YiBQUNDl,X,Y l LOOPUNTILX=0 

150 DATA739, 1 1 ,77B, 1 1 ,784, 1 1 ,770, 1 1 ,739 



<245> 

<210> 

<235> 

<B> 

<18> 

<254> 

<39> 

<31> 

<247> 

<250> 

<14B> 

<140> 

<2B7> 

<24> 

<B1> 

<1B1> 

<212> 

<232> 

<77> 

<1B3> 

<233> 



155 DATA1 1,721, 11, 739, 11, 643, 11 ,664,11 <97> 

160 DATAS96,11,5S4,22,516,22,453,25,0,1 <130> 

165 rFN<UTHENP=0:0=UsU=Ns GOTO 180 <201> 

170 IFN<OTHENP=0:Q=Ns GOTO 180 <12> 

175 IFN<PTHENP=N <160> 

1B0 CHARl,33,l,"l."iCHARl,33,3,"2. " < 100> 

185 CHRR1,33,5,"3. ":L*=STR*(F> <53> 

190 CHAR1,35,5,L*»L*=STR*<U) < 1B5> 

195 CHARl,35,l,L*:L*=STR*<0)iCHARl,35,3,L* <15B> 
200 FDRI-1 T0999 j NEXTI i S0UND1 ,770, 12t SOUND! ,810, 1 

2:CHARl,14,4,"NOCH{SAAC£JI1AL(J/N>?" <116> 

205 SETKEYL*:IFL*="J"THEN6 <^g> 

210 IFL*O"N"THEN205 <255> 
215 S0UNP1, 77, 37«C0L0Rl,4iCHARl, 14,17. "NAt SFdCO 

DflNNt SP/SCO NICHT j " T 1 <104> 
ENDE DES LISTINGS 

Ende des Listings 




Sie haben nach langen Schürfarbeiten fest- 
stellen müssen, daß Sie auch etwas leichter 
zu Ihren begehrten Goldnuggets kommen 
können. Nicht weit von Ihrem Lager haben 
Sie eine Höhle ausfindig gemacht, in der es 
von Nuggets nur so wimmelt. Dabei wäre 
Ihnen Ihr Goldfieber bald zum Verhängnis 
geworden. Doch konnten Sie gerade noch 
vor den Höhlenmonstern fliehen. 
Natürlich läßt Ihnen der Gedanke an das 
Gold keine Ruhe, wo es doch greifbar nah 
ist. Es geht einfach kein Weg dran vorbei. 
Sie müssen in die Höhle. Für diese gefähr- 
liche Aktion schmeißen Sie sogar Ihren Jo- 
ker, den Sie von einer Fee erhalten haben. 
Dadurch haben Sie drei Leben, um das ge- 
samte Gold den beiden Monstern abzu- 
luchsen. Zunächst müssen Sie an dem 
Monster, das den Eingang bewacht, vorbei. 
Anschließend gilt es das andere Ungetüm, 
das den Schatz bewacht, zu foppen. Leider 
ist mit dem Einsammeln noch nicht der 
große Reichtum bei Ihnen ausgebrochen. 
Erst wenn Sie die Nuggets wieder nach 
oben ins Körbchen gebracht haben, landet 
die eingeheimste Summe auf Ihrem Kon- 
to. Noch ein kleiner Tip: Sie können der 
Hetzjagd mit dem Monster ein Ende berei- 
ten, wenn Sie die Abkürzung durch die 
Falltür wählen. 

Bleibt uns nur noch Ihnen viel Glück zu 
wünschen. 






W OÜr Ö Ö. fl^rt 
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Das Listing: 



C-16 LISTING + CHECKSUMMEN <0C VI. 8) 

10 SCNCLR:COLORO,15,2:COLOR4,15,2:COLOR1,B,6 

20 FOKE55,255 S POKE56,59:CLR 

30 PRINTTAB(IB) " C P0Wtt3 > G. O. L . D . F ■ I.E.B.E.R- 

40 PRINTTAB« IS) "CC0HMJBY" 

58 PRINTTAB (14) " WOHN2 5 BERND t S FACE 1 HEYER" 

60 PRINTTAB ( 17) "tP0WW2> 1986" 

70 PRINT" {RJCHT2 D0UH4 y JDYSTICKt SP/ICO INt SP4CE JP 

ORTCS P4CE M" 

00 PRINT" Ctf2jffHT£ B0HH2 1 ERKL AERUNG { SP4CE } GEHUENBC 
HT?{SP4CF2 Ff.4SH0W :>Jt SP/lCE }/-[ SP4CE ?N{ SP4CE FL/SSH 
ö££3" 

70 GETA*!lFA*="J"THEN BCNCLRs GüTGl 10 
100 IFA*="N"THEN250:ELSE90 

1 10 PRINT"SAMHELN{ SP;'iCC >SIE<: SP4CE ?MQEGLICH5T{SP4 
CO VIELE ( SP4CE >NUGGETB< SP4CF >EIN" 

120 PRINT"{DO«W>ABER{SP4«>SeiEWCSP ! 4CFJSIE<SP<gCE 

WORSICHTIGf SF/lCC JVQRt S/MCg JDEN" 

130 PRINT "GEFAHRENt SP4CO INt SP/ICC JDERC SPdCO HGEH 
LE" 

14(3 PRINT"t PgWW ?DASt5P^Cg>OBERE<: SP/ICE lnONSTER<:SP 

4CEJ BEWACHT CSP£C£J DEN t SP ACE > E I NGANG" 

150 PR INT " i üOH W > DAS < SP/3CE > MONSTER t SF4CF > IM t S PdC F. 

JHÜEHLENLABYRINTH" 

160 PRINT"BEWACHT{SRflCE>DIE<SP j aCE>SCHATZKIST£" 

170 PRINT" { D0Wm DIE<:SP4CE}PUNKTE{ SP4CC >HERDEN{S 
PACE 1 ERST iSPACEJ DANN E SP4Cf > BEWERTET " 

180 PRlNT"WENN{SP4C£}SIEfSP^C£>ZUMtSP4C£>ElNGÄNS 

IS£ACR> GEBRACHT iSPACE} WURDEN ! * " 

190 PRINT" l POHH2 :tAU5<: SF J 4CE 3DER< SP4C£ >SCHATZKISTE 

CSP4CE > KOENNEN {SPACE JS IE " 

2BB FRINT"MAXIMAL{SP/IC£>5B0tS i P4C E 3 NUGGETS{ SP4CC > 

MITNEHMEN" 

210 FRINT"{ PQWW >OURCH{: SP>ICC JPIEt SP^C£ >FftLLTÜERtS 

P/ICF>KANIvH: SP>lCg >HANCSP/iCE>SICH" 

220 PRINT "FALLENLASSEN i SPACE J-JS PACE y iaüVtSPACgy 

INtSP^CEJSTELLUNG{SP^C£>0) " 

233 PRINTTAB < 15) ° J D0HH2 FL4SJ£0W> PRESS CSP4C£}F IRE 

t FLASHOFF l" 

240 IF JOY<1>=«=12BTHEN25B:EL5E240 

250 FGKE652B6,0 

260 REM NEUE ZEICHEN 

270 V=652B0 

280 PQKEV+lQ,PEEK{V+19>ANDNOT4 

290 POKEV+ 19, 60 

3130 FDRT=81 9TDB31 : READA: POKET , As NEXT: SYSB19 

310 FORT=15Q72Tai6295-.READA: POKET, AsNEXT 

320 GQSUB340: ÜUSUH66B; GOTQ68B 

330 REM SPIELFIGUR 

340 BCNCLRsCOLOR0,l»CDLDR4,l(SC=BsLI=3lPI=0 

350 SCNCLR:G=BBsH=B9 

360 A=3174: B=3214iFO=&4:FU=74: AA=*32: 8B=32: AB=I : A 

C=l: (1=1024: MK=9S 

370 U=3072:Ul=339tlU2=2367:U3=3552 

380 PRINT" < BLACK CE CR CE CR CE CR CE CR CE CR C 

C CR CE CR CE CR CE CR CE CR CE CR CE CR CE CR Y 

ELLQH JPaimS" 

390 PRINTTAB ( 14) "iBRH CH. CE2 CR2 CQ SP ACE3 , P1HK 

CT BRH CPy" 

40« PRIWTTAB<13) "iBRH. CN2 CQ SPACE7 PIHK C T BRH 

CA SPACE2 YELLOH y SCORE" 

410 PRINT" I VEL LOH SPACE2 y L I VES < SPACES BRH CR2 CQ 

SP ACES PIHK C& BRH CP}" 
420 PRINT" iBRH CZ_ CE_ CR CE CR2 CE CR CE5 CQ SPAC 
EA CA CE. CR2 C£ CR CH_ rgf.£.tW >HI-5C0RE" 
430 PRINT" iBRH CZ PIHK SP BRH SPACE 15 CP CE2 CR3 

CE CR CE2 CR CE. CR CE, CR2 CE CR CE. CR2 CE CP> " 
440 PRINT" I BRH CS PIHK SP BRH SPACE13 CH CE Ctt C 
Q Cft Ctf CJH CQ CS CD. CE2 m CR2 CE CQ SPACE4 CD CQ S 

pace2 cpy 

450 PRINT" CO/W CS PIHK SP BRH C2 S\_ CE SR CE4 PI 
HK SP BRH CE2 CZ. CS §± SPACE4 CQ CE, CQ SPACES Ctt 

SPACE1* CP}" 
460 PRINT" iBRH. CS. PIHK SP BRH SPACES PIHK SP BRH 

SPACE28 CA?" 
470 PRINT" iBRH CZ PIHK SP BRH SPACEB PIHK SP BRH 

SPACE20 CZ PIHK SP BRH QM2. QR CE, CR PJHK SP BRH 

cpy" 



<167> 

<151> 

<lt> 

<17> 

<19S> 

<191> 

<194> 



<105> 
<166> 
<164> 

<2> ' 

<236> 

<16B> 

<37> 

<183> 
<16> 

<206> 

<159> 

<104> 

<36> 

<194> 

<246> 

<15> 

<96> 

<il6> 

<1B9> 

<217> 

<252> 

<71> 

<*21> 

<95> 

<I> 

<62> 

<15Q> 

<123> 

<164> 
<132> 

<iii> 

<127> 

<i38> 
<138> 
<153> 
<194> 

<i8?> 

<167> 
<177> 

<40> 



480 PRINT" ( BRH CS PIHK SP BRH CE2 PIHK SP BRH CE 

2 CR3 CE2 PIHK SP BRH CR2 CYAH SQ SR3 SS BRH CS 

CR CE. CR CE PIHK SP BRH CZ. CP C£ CR CE2 PIHK SP 

BRH SPACE4 CP P1NK SP BRH CA}" <51> 

490 PRINT" CBRH S± PIHK SP BRH CZ CP PIHK SP BRH 

SPACET P1NK SP BRH SPACE7 CA CjS CP CZ_ CA PIHK SP 

BRH CD CZ CP §X QP CA PINK SP BRH SPACE4 CE PIH 
K SP BRH CA}" <BZ> 

500 PRINT" iBRH CQ PIHK SP ORHG C12 PIHK SP BRH S 
PACE7 PIHK SP BRH SPACE! C£ CS C£ CS CA PIHK SP 
BRH SPACE4 CD CZ_ CS PIHK SP BRH C£ CR PIHK SP BR 
H SPACE PIHK SP BM CDy" <116> 

510 PRINT" I BRH CQ PIHK SP2 BRH CZ CS2 CA PINK SP 

BRH CS CP CJi CA CE CM CE SPACE CA CR2 CZ S\. SPA 
CE4 PIHK SP BRH SPACE4 CS SPACE2 PIHK SP BRN CS 
CP PIHK SP BRH SPACE PINK SP BRH C&i" ~~ <iB3> 

520 PRINT" £8RN CM PIHK SP2 BRH SPACE3 CD PINK SP 

BRH CE CR CE3 CR CE CYAH ST BRH CH CQ SPACE7 PI 
HK SP BRH CE CYAH ST BRH CR PIHK SP BRJH SPACES £ 
IHK SP ORHG C12 PIHK SP BRH CH PIHK SP BRH CD1" <147> 

530 PRINT" iBRH CZ. CE PIHK SP 8RH SPACE4 PIHK SP 
BRH SPACE 14 CP CZ. CP CR CQ SPACE2 PINK SP BRH SP 
ACE2 CA CE CM SX PIHK SP BRN CH PINK SP BRH CD >" <72> 
540 PRINT" iBRH CE PIHK SP2 BRH CS CP SPACE2 PIHK 

SP BRH SPACE 12 CP CR SPACE7 PIHK SP BRH CQ CE. C 
D2 SPACE2 PIHK SP BRN CH PIM. SP BRH CJL } " <06> 

550 PRINT" i BRH S\ PINK SP2 BRH CS CH2 CE CR CH P 
IHK SP BRH CH QQ CYAH ST BRN CR CE. CR3 CH PIHK $ 
P BRH SPACES CH PINK SP BRH CH2 CQ SPACE3 PIHK S 
t 0RHG CI PIHK SP BRH CH } " <144> 

560 PRINT" iBRH CH PIHK SP BRH CE CH CH2 CH CE2 P 
IHK SP BRH CA S± SPACE CZ CS CA2 CS SPACE PIHK S 
P MN SPACE3 CD CH_ CH. CE CR CH. PIHK SP BRH CE CQ 

SPACE3 CH CE CR PIHK SP BRN CHI" <205> 

570 PRINT" i BRH CH PIHK SP BRH CZ. S± CD CE. CQ SPA 
CE2 PIHK SP BRH SPACE9 PINK SP BRH CA CH2 CQ SPA 
CE5 PINK SP BRH SPACE4 CH CE CH CH PIHK SP BRN C 
Ay ' ' ' <I&3> 

580 PRINT" <BRH «1 PJW* SP BRH CH PIHK SP BRH SPA 
CES PIHK SP BRH_ SPACE9 QU CR CE CR SPACE* PIHK S 
P BRH SPACE! CH CS CA2 CS PIHK SP BRN CPi" <147> 

590 PRINT" i BRH CH PINK SP BRH CH PIHK SP BRH SPA 
CE4 CZ CH CE CH PIHK SP BRH CE CR2 CH CE2 CR2 S\_ 

SP ACE 3 CH CYAH ST2 BRH CR2 CH2 CE 4 CR CE PIHK S 
P BRH CA}" " ** <92> 

600 PRINT" iBRH CQ PINK SP BRH SPACE PIHK SP BRN 

CH2 CQ PIHK SP BRH. SPACE4 PIHK SP BRH_ SPACE4 ORH 
G Ct2 BRH SPACES CH CZ SPACE 12 PIHK SP BRH CPi" <20B> 
610 PRINT" iBRH CQ PIHK SP BRH SPACE PINK SP. BRH 
CR2 CE PIHK SP BRH SPACE4 PIHK SP SPACE4 BRH CA 
SA PURPLE C± BRH SPACE3 CH2 CS SPACE12 PIHK SP B 
RH CA}" <g> 

620 PRINT" ( BRH CS CH CR2 CZ CA2 , CZ CU2 CH4 CH2 C 
£ Ott QU CR CH2 CH CH2 CH4 C£ CH3_ CE2 CH CE2 HOHE 
2}"jFOKE4070,li5sPaKE4071,H6 " <207> 

630 PaKE65286,27:POKE3175,96 <5> 

640 COLOR1,B,7:SOSUB2070:GOSUB2B90:BOSUB2100:GOS 
UB2120 <!7i> 

650 GOSUB2000;GOSUB1970: RETURN <161> 

660 GOSUB 1940s RETURN <46> 

670 REM HAUPTSCHLEIFE <242> 

680 IFA>3312ANDA<3511THENGGSUB1690 <81> 

690 IFA>U3THENGGSUB1430 <B6> 

700 J=J0Y(1) s IFJ=0THEN10B0 <177> 

710 ONJGOTG720, 780,7GB, 780 T 880, 900, 900 ,900 <122> 
72B IFJ=M28THEN6S0 <210> 

730 SGUND1 T 50,2-A=A~403B=B-40!A1=FEEK(A) :A2=PEEK 
(A-M) : IFAKB1THEN750 <206> 

74B IFAl=I01THENPI=PI+itGOSUB2B70:Al=32lELSEA=A+ 
40;B=B+40sGOTO680 <47> 

750 POKEB+40,BB!PaKEB+4B-M,AC:BB=AA:AC»AB*AA*Alt 
AB=A2 <2&> 

760 IFF0=67THENF0=68»FU=79jELSEFD=67iEU=7a <243> 
770 GOSUB1070:GOTO680 <243> 

780 SGUND1 ,20, 2: A=A+1 : B=B+1 { A1=PEEK (A) * B1*PEEK CB 
) : IFA1=32ANDB1=32THEN790;ELSE82B <94> 

790 IFFG=66THENFG=73iFU=71sELSEFa=66iFU=72 <120> 
B00 FGKEA-1 ,AA«PDKEB-l,BBiPDKEO-l-M,AB«PaKEB-l-M 
,AC <n> 

B10 P0KEA,FGiPGKeB,FUsPaKEA-M t 73tP0KEB-fi,7BiAA=-3 
2jBB=32:GOTP680 <92> 

B20 IFAl=80ANDBl=8BTHEN830tELSE850 <1S7> 

830 PDKEA- 1 , AAt POKEB- 1 , BBi P0KEA-1-M, ABl PDKEB-1-M 



30 



ComputronEc 



,AC <41> 

840 FOKEA,FO: POKEB, FU: POKEA-M, 73: POKEB-M, 7SiAA=8 
Bs BB=80: AB=97i AC=97: B0TQ6SB <146> 

85B IFPEEK (A)=101THENPDKEA-1,AA:POKEB-1,BB*PDKEA 
~I-M,AB:POKEB-l-M,ACiEL9EB70 <133> 

B60 PDKEA, FO:POKEB,FU*PQt<EA-M,73i POKEB-M, 7BiPI«P 
1+1 : GO5UB2070: AA=32: BB=32: GOTQ6B0 <205> 

070 A=A-i:B=B-l:GGT01BiB <179> 

S9B A=A+40sB=B+4ß:Bl=PEEK(B) *B2=PEEK tB-M) |IFB1>8 
0THENA=A-40 1 B=B-40 1 GOTO6B0 < 246 > 

B90 S0UND1 ,5B,2iPDKEA-40 T AA»POKEA-4B-M,ABt AA»BBt 
AB=AC: BB=B1 1 AC=B2i GOTO760 <36> 

9BB A=A-1 s B=B-1 : A1=PEEK ( A> l Bl-PEEK IB) l IFA1-32AND 
Bl=32THEN910iELSE94B <9> 

910 IFFa=65THENF0=75(FU=77»ELSEFD'65sFU=76 <2B9> 
92B POKEA+l,AAiPQKEB+l,BB:PaKEA+l-M,AB:PÜKEB+l-M 
,ACiSOUNDl,20,2 <7> 

930 PGKE A , FD : POKEB ,FU* POKEA-M , 73 1 POKEB-*! , 78 ! AA«3 
2iBB=32iGOT06BB <212> 

940 IFA1=B0ANDB1«BBTHENPOKEA+1 ,AAlFOKEB+l ,BBsPOK 
EA+l-M,AB«PGKEB+l-M,ACtELSE96B <174> 

950 PDKEA, FOs PDKEB, FU:P0KEA-M,73:P0KEB-M,78lAA=*B 
esBB=BaiAB=97tAC=97lGOTD6BB <B> 

960 IFAl=lBlTHENPDKEA+l,AAlPOKEB+l,BB(POKEA+l-M, 
AB:POKEB+1-M,AC*ELSE9B0 <176> 

97B POKEA,FO: PDKEB, FUi POKEA-M, 73: PDKEB-M, 78« PI-P 
I+liBOSUB2B7B:AA=32tBB=32iGaTD6B0 <59> 

980 IFBl=lB2THENA=A+liB=B+liP0KEA,75i POKEB, 7Bi PI 
=PI+50jGOSUB2B70:GOTOlBlB <19Z> 

990 A=A-*-liB=B+ltGOTO6B0 <154> 

1000 IFPEEK (B+40) -32THENA«A+40! B-B+401 Bl»32i B2*l 
SGOTDB90 <14B> 

1010 IFBB=B0THENFO=67:FU=7B:ELSEFO«64lFU»74 <186> 
1020 IFA=3174ANDPI>BTHENGOSUB2l30JpaKEMP,MlsPOKE 
MP-M, MF i ELSE 1040 <174> 

1B3B POKEUl+X,N2iPDKEU2+X,F2sGOSUB2B0BaGOSUB194B 
:B0SUB196B <216> 

1B4B PaKEA,FD:PDKEB,FUiPaKEA-M,73:P0KEB-M,7B <31> 
1 050 I FA=35670RA=3B59QRA=36840RA=3579THENGDSUB 1 
80 <171> 

1060 G0T068B <133> 

1 070 PDKEA , FO» PDKEB , FUl POKEA-M , 73: PDKEB-M , 7B< RET 
URN <171> 

1080 DD <39> 

1090 A«=A+40=B=*B+4BjB1=PEEK<B)*B2»PEEK(B-M> <173> 
1 1 00 POKEA-40 , AA : POKEA-40-M , AB : PDKEA , 66 ! PDKEB , 74 
: POKEA-M, 73; PDKEB-M, 7S <196> 

11119 AA=BB:AB=AC:BB»B1:AC=B2: SOUND l,81B, 4s SOUND1 
,834,8 <1> 

1120 L0GPUNTILB1MB2: PDKEB, BUPOKEB-M,B2 <70> 

1130 A=A-4B:B=B-4BxAl=PEEMA> i A2=PEEK(A-M> * BB"=AA 
5 AC— ABl AA— AI * AB sj A2 <127^ 

1140 PDKEA, 64 «PDKEB, 74 »POKEA-M, 73 i POKEB-M, 78: RET 
URN <41> 

1150 VOLB:FGRT*1000TO4005TEP-40i5OUNDl ,T,5aSDUND 
2,T+10,4 <177> 

1160 POKEUl+X, 88: P0KEU2+X,1 80: NEXTTt RETURN <1B9> 
1170 POKEUl+X,eBiFQKEU2+X,100 <175> 

1 1 B0 POKE A , A A : PDKEB , BB j PDKEA-M , AB ■ POKEB-M , AC i POK 
EUi+X,BsPDKEU2+X,100 <213> 

1190 GO5UB28B0SGO5UB2070 <16B> 

1200 LI=LI-1:GO5UB2090:IFLI=0THEN1310 <2t9> 

1210 lFNl=FOTHENNl«=AA:Fl=ABtELSENl=BBiFl«=AC <10B> 
122B PDKEU1+X,N1:PDKEU2+X,F1 <6B> 

1230 AA=32: BB=32: AB=1 : AC=ls A=3174i B=32i4iPDKEMP f 
Ml:PDKEMP-M,MFlGDSUB2000 <120> 

1240 GDSUB194BiGDBUB1970:RETURN <26> 

1250 MK=94iPOKEMP T MK:PUKEMP-M,95iGaSUBl 150! PDKEA 
,AA: POKEB, BB: POKEA-M, AB <49> 

1 260 PDKEB-M , AC» G0SUB2BBB s GOSUB2B70 s L I =LI - 1 1 GQBU 
B2090 <156> 

127B IFMP=ATHENXl=AA»X2=ABsELSEXl=BBtX2=AC <26> 
12B0 A=3174:Be3214!AA=32iBB=32tAB=llAC=l <1BB> 

1290 IFLI=BTHEN1310 <55> 

1300 RETURN <167> 

1310 IFSOHITHENHI=SC <10> 

1320 COLOR0,7,IsCDLORl,B,6:SCNCLRiPRINTTAB<15>"{ 
DOHH3 > GAME t SPACE > VER " <244> 

1330 PRINTTAB(S) " tD0H«3J NOCH CSP4CE> EI NCSPj4CE>3Pl 
EH SP4CE FLASHOH yj { SPACE ! / J SPACE yNC FLASHOFF y " <64> 

1340 PRINTTABIB) " { POWW4 >GCDRE"SC <120> 

1350 PRINTTAB<5)"t POHW4 }HI-SCORE"HI <2B3> 

1360 RESTORE2700:VCIL5 <153> 



1370 BETA*: IFA*»" J"THENGOSUB340i RETURN <212> 

13B0 IFA*= ,, N"TMENSCNCLR:CDLOR0,2,7tCaLORl f ItEND <143> 

1390 READJ,K:S0UND1,J,K:S0UND2,J+2,K < 102> 
I 400 CHAR , 26 . 1 4 ■ " t FLASHON YL.GRH CKZ OOUM LEFT2 

SF SE_ FLASHOFF y't P0KE3655 . 88 i PDKE5662 , BB <216> 

I41B IFJ=0THEN1360:EL5E1370 <2B2> 

1428 REM MONSTER BEWEBEN <217> 
1 43B IFA>MP+25THENMP=>MP+40: G0BUB1 63Bl MK»95s G0T01 

480 <37> 

1440 IFA>MPTHENMP-MF+lsGDSUB1630»MK=93:GOTO1520 <11B> 
1 4SB I FA<MP-25THENMP=MP-40 i G0SUB1 63B : MK«=94 i GDTOl 

55a <242> 

1460 IFA<MPTHENMP=MP-llGOSUB1630sMK=»92tGOTG1590 <77> 

1470 RETURN <81> 

14B0 IFXl>102THENMP=MP-41:GDSUB1630sGDTD1500 <3B> 

1498 POKEMP-40,M1:PDKEMP-M-40,MF:BOTO165B <14B> 
1500 IFXl>102THENMP=MP+2iGO5UB1630:POKEMP-l,Ml(P 

DKEMP- 1~M, MF i GDTOl 650 <215> 

1510 PÜKEMP+l,MläPDKEMP+l~H,MF:SOTai650 <125> 

152B lFXl>ia2THENMP=MP-41:GOSUB1630[GQTO1548 <17B> 

1530 P0KEMP-1,M1iP0KEMP-1-M,MFjG0TO165B <162> 

1540 POKEMP+40,Ml:POKEMP+4B-M,MF?GÜTOi&50 <119> 

1550 IFX1>102THENMP=MP+41:GDSUB1630:GDTO157B <20> 

1560 POKEMP+40,MlsPOKEMP+40-M,MF:GOTO1658 <139> 
1570 IFXl>102THENHP=MP-2aGDSUB1630:POKEMP+l,Mt:P 

OKEMP+I-M,MF:GQTO1650 <239> 

158B paKEMP-l,Ml(PQKEMP-l-M,MFlG0T0165B <213> 

159B IFXl>102THENMP=MP+41iGaSUB1630iBOTO161B <1B0> 

1600 PDKEMP+l,Ml!P0KEMP+l~M,MF:60T01658 <216> 
1610 lFXl>102THENMP=MP-BBtGOSUB163BiPDKEMP+4B,Ml 

:PDKEMP+4B-M,MFtGGTD165B <137> 

1620 POKEMP-4B,MltPOKEMP-40-M,MFiBOTO1650 <217> 
1630 X1=PEEK<MP> »X2=PEEK(MP-M> ! IFX1=FDDRX1=FUTHE 

NGOSUB1250 <1Z7> 

1640 RETURN <252> 

1650 BOUNDl,10,2:Ml«XllMF-X2 <2B3> 

1660 Z=INT<RNDCl)*2)+l:IFZ=lANDPI>8THENMK-32 <233> 

1670 POKEMP,MKsPOKEMP-M,95:RETURN <59> 

16B0 REM MONSTER 1 <167> 

1690 Zl=A-3311t IFZK4BTHEN1710 , <2B7> 

1700 DDWHILEZ1>405Z1>«Z1-40:LOOP <117> 
1710 IFZKXTHENX=X-lsNl=PEEK(Ul+X)lFl*PEEK(U2+X) 

5GDTO1830 <3*>> 
1720 IFZl>XTHENX=X+isNl=PEEK(Ul+X)tFl=PEEK<U2+X> 

sGDTaiGBB <21B> 

1730 IFU1+X=BTHEN1760 <147> 

1740 IFUH-X-4B=BTHEN1790 <24B> 

1750 IFUl+X+40=ATHENlB20eELSERETURN <86> 
1760 PDKEU1+X,BB:P0KEU2+X, 100:BOSUB1 150: POKE A,AA 

i PDKEA-M, ABjN1=N2sF1=F2 <110> 
1770 GDSUB20B0!BDSUB2B78sLI=LI-l:QOSUB209O: IFLI*= 

0THEN1310 <37> 

17B0 G0T0122a <51> 
1 790 P0KEU1+X , N2i PDKEU2+X ,F2« PDKEU1+X-4B, 88i PGKE 

U2+X-40,100iGOSUB1150 <166> 
1800 POKEA , AAs PDKEB, BB: PDKEA-M, ABl POKEB-M, AC: Ll= 

LI-t:GDGUB2090t 1FLI=0THEN13I0 <1BB> 

1S1B GaBUB20B0eGDBUB2a70 S GDTal220 <176> 
1B20 PQKEUl + X,NZ:POKEU2 j i-X,F2(PaKEUl+X+4a,B8sPOKE 

U2+X+40, 1001 GOSUB1 150; GDTD1B00 <152> 
183B IFNl=FaDRNl=FUTHENPOKEUl+X+l ,N2: P0KEU2+X+1 , 

F2:GOSUB1150:GOTD117B <1B2> 
1B40 PDKEU1 +X+1 ,N2: PDKEUZ+X+1 ,F2: P0KEU1+X ,G( POKE 

U2+X,100sN2=NliF2=FI <120> 

1850 yDL25SaUNDl,700+X#5,3 <214> 

1B60 G=G-1 s IFG=B4THENG=BB <118> 

1870 RETURN <227> 
1BB0 IFN1=FD0RN1=FUTHENP0KEU1+X-1 ,N2: P0KEU2+X-1 , 

F2:GOSUBl 150: GDTOl 170 <201> 

1890 VOL2:SDUND1,700+X*5,3 <254> 
1900 PDKEU1+X-1 ,N2:POKEU2+X-l,F2iPDKEUl+X,HiPOKE 

U2+X,100sN2=NliF2=Fl <232> 

1910 H=H+li IFH=92THENH=BB <169> 

1920 RETURN <21> 

1930 REM MONSTER 2 <171> 
1940 Z=INT (RND< 1 ) »38+1 > +363Z+INT (RND ( 1 ) «11 + 1 > «40 

I IFPEEK (ZJ032THEN 1940 <16B> 
195B MP=ZjMF=PEEK(MP-M)iM1=PEEK<MP)iPDKEMP,MKiP0 

KEMP-M, 95: RETURN . <203> 

1960 REM MÜNSTER l <192> 
1970 X= INT <RNDU) »26+2 ) sN2-=PEEK (Ul+X> sF2=PEEK(U2 

+X) <1^> 

1980 POKEU1+X,G:POKEU2+X,1B0:RETURN <12> 
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19*70 REM ßOLDNUGGETS 

2000 FGRT= 1 TG5B ! Z= I NT < RND < 1)*37+1> +3392+1 NT (RNBt 

1>*14+1)*40 

2010 IFPEEKCZ>=32THEN2B30 

2020 NEXT: RETURN 

2030 IFZ=397iTHEN2020 

2040 C=PEEK<Z-40) » IFC=32ORC=101THEN2B50:ELSEPOKE 

Z,i01:PaKEZ~M,99sGOTO2020 

2050 C=PEEK CZ-B0) t IFC=32ORC=1B1THENPOKEZ~B0, 101 t 

POKEZ-B8-M,79:GOTa2020 

2060 POKEZ-40, 101 sPÜKEZ-48-M, i 19s GDTD2020 

2070 VOI_2:PI*=STR*(PI):CHAR,32,B,PI*:IFPI>508THE 

NP1=P 1-501 RETURN: ELSERETURN 

2080 CHAR , 32 , , " J. SPACE6 1 " i F I =8 s RETURN 

2090 LI*=STR*(LI):CHAR,B,3,LI*»RETURN 

2100 SC*=STR*(5C> iCHAR,32,2,5C:* 

2110 IFBOHITHENHI=BC:ELSERETURN 

2120 HT*=STR*(HI) SCHAR, 33, 4 , HI*: RETURN 

2130 SC=SC+PI : GO5UB21B0S BOSUB26S0I GDSUB207B 

2140 RETURN 

2150 DATA162, 8,189,0,288,157,8,60,169,8,269, 157, 

0,61,189,0,210,158,0,62,189 

2160 DATAB, 21 1,157,0,63, 232, 224, 0,208,227, 24, 96 

2170 DATA56,84,56, 16, 124 , 1B6, 186, 186 

21B0 DATA2B,46,28,8,15B,1B9,93,29 

2190 DATA56,U6,56,16,121,1B9,1B6,1B4 

2200 DATA57, 125,57, 17, 126, 184, 184,56 

2210 DATA153, 190, 156, 136, 126, 29,29,28 

2220 D AT A2S4 , 25* , 246 , 1 98 , 1 2 , 24 , 240 , 224 

2230 DATA127,127,111,99,48,24,1S,7 

2240 DATA184, 56, 156,214,115,51 ,2,3 

2250 DATA56, 62, 63, 115,98, 195, 192,64 

2260 DATA1 12, 232, 112, 32, 112, 251, 116, 56 

2270 DATA 186,56, 124, 10B, iBS, 10B,40, 108 

2280 DATA14.23, 14,4, 14,223,46,28 

2290 DATA28, 124,252,206,70, 195,3,2 

23S0 DATA29, 28, 57, 107, 206, 204 ,64, 192 

2310 DAT A28, 92, 246, 246, 70, 198, 4, 6 

2320 DATA56 , 58 , 1 1 1 , 1 1 1 , 98 , 99 , 32 , 96 

2330 DATA66, 126,66,66,66, 126,66,66 

234B DAT A255 , 6B , 255 , 7 , 1 4 , 28 , »6 , 240 

2350 DATA255, 68, 255, 255, 0,0,0,8 

2360 DATA255 , 68, 255 ,224 , 1 12,56 , 28, 15 

2370 DATA255, 255,0, 8,B,B,0,B 



<107> 

<174> 
<117> 
<139> 
<28> 

<81> 

<244> 
<224> 

<26> 

<157> 

<2B6> 

<97> 

<23> 

<41> 

<83> 

<242> 

<105> 
<111> 

<4> 

<13B> 

<125> 

<178> 

<42> 

<182> 

<88> 

<9> 

<171> 

<B8> 

<215> 

<26> 

<1B6> 

<58> 

<244> 

<1B3> 

<197> 

<169> 

<95> 

<65> 

<24> 



2380 DATA1 26 , 1 47 , 1 47 , 254 , 1 86 , 6B , 1 24 ,56 
2390 DATA 126, 187, 17, 186, 254, 130, 6B t 56 
2400 DATA126, 147, 147,126,66,98,60,24 
2410 DATA126, 153,153,255,90,66,60,24 
2420 DATA126,2B1,281,126,66,98,6B,24 
2430 DATA126,221,136,93,127,65,34,2B 
2440 DATA126,201,201,127,93,34,62,28 
2450 DATA84, 186, 17, 186,254, 130,68,56 
2468 DATA42 t «?3, 136 ,93, 127 ,65,34 ,2B 
2470 DATA98, 189,24, 189,231 ,66,36,24 
2480 BATA90,189,24,189,231,66,66,6« 
2490 DATAS, 16,8, 16,24, 36,66, 129 
2500 DATA126,231 , 192, 153, 195, 231 ,126, 126 
2510 DATA255,255, 129,8,0, 129,255,255 
2520 DATA16,8, 16,8, 16,8, 16,8 
2530 DATA129, 129,255, 129,255, 129,255,255 
2540 DATA0,0,0,0, 16,56, 16,8 
2550 DATA192,I2B,128,12B,255,255,255,255 
2560 DATA24.2B, 124,56, 16,0,0,8 
2570 DATA1 ,3,5,3,31,30,55,3 
2580 D AT A255 , 254 , 24B , 248 , 248 , 224 , 224 , 1 28 
2590 DATA0, 1,3,31,15,31,63,255 
2680 DATA254,24B,224, 176, 184,228,128,8 
2610 DATA1,3, 19, 31 ,63,15,3, 1 
2628 DATA255 , 254 , 252 , 252 , 248 „ 254 , 255 ,255 
2630 D ATA254 , 248 , 248 , 254 , 252 ,248,252,254 
2640 DATA255, 31 ,63,7,15,31,31,63 
2650 DATA127,63,31,61,57,3,7,127 
2660 DATA255 , 255 , 251 , 25 1 , 247 , 207 ,13,3 
2670 DATA255,247,251 , 187, 141 ,201 , 192, 192 
2680 DATA129, 153,251 ,247,255,255,255,255 
2690 DAT A4 , 1 97 , 207 , 247 , 25 1 , 255 , 255 , 255 
2708 DAT A704 , 50 , 685 , 25 , 704 , 25 , 739 , 25 
2710 DA TA704, 25, 685, 25, 704, 25, 57 1,25 
2728 DAT A596 , 25 , 685 , 25 , 704 , 25 , 739 , 25 
2730 DATA/04, 25, 685, 25, 704, 12,685, 12 
2740 D AT A704 , 40 , 685 , 25 , 596 , 25 , 57 I , 25 
2750 D ATA739 ,50,8,1 
ENDE DES LISTINGS 



<11> 

<1> 

<121> 

<12t> 

<221> 

<2> 

<122> 

<143> 

<151> 

<196> 

<15> 

<16> 

<B9> 

<25B> 

<10> 

<238> 

<43> 

<215> 

<222> 

<101> 

<227> 

<25> 

<25> 

<73> 

<234> 

<11B> 

<30> 

<187> 

<232> 

<51> 

<65> 

<238> 

<139> 

<16> 

<207> 

<245> 

<188> 

<i3i> 



Ende des Listings 




erer 





aufgepaßt 



Schickt uns Euer selbsterstelltes Programm! Dann 
schicken wir Euch nach der Veröffentlichung in un- 
serem Heft die entsprechende „Penunze" dafür! 
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Hey, Spielefreaks, wenn Ihr jetzt denkt, 
daß es sich bei diesem Game um das alte, 
schlappe Senso handelt, seid Ihr leider 
schiefgewickelt, denn SENSO PLUS bie- 
tet einige Besonderheiten, die das Spiel 
wirklich spannend machen! Also, zunächst 
einmal geht es natürlich darum, vom Com- 
puter vorgegebene Farbfolgen nachzu- 
drücken. Bei dieser „Extended Version,, er- 
hält man aber für jedes richtig nachge- 
drückte Feld auch noch einige Pünktchen! 
In der ersten Runde gibt's pro Feld 30 
Punkte, in der zweiten 60, dann 90, usw. 
Ein Level besteht aus insgesamt drei Run- 
den. Im ersten Level müssen 9 Felder nach- 
gedrückt werden, und mit jedem Level 
steigt die Anzahl um drei Felder, so daß im 
letzten Level, dem Level fünf, 21 Felder ge- 
meistert werden müssen. Die glücklichen 
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1 REM 1 SENSO PLUS M 

© 1987 BY 
»MICHAEL SUCK1 

2 CLEAR 65000: BORDER 0: PAPE 
R 0: INK 7: FLASH 0: INVERSE 0: 
OVER 0; BRICHT 0: CLS 

3 FOR i-1 TO 16: BEEP . Q05,i: 
NEXT i 

; 4 PRINT AT 9,9:" PLEASE WAIT! 

5 PRINT INK 5; PAPER 1; BRIGH 
T 1; FLASH 1 ; AT 12, IG;" SENSO PL 
US " 

6 PRINT AT 14,ll;"is loading" 

7 PRINT #1;" SENSO+ © 1987 B 
Y MICHAEL SUCK" 

8 INK 

9 LOAD "sp udg"CODE 
10 LOAD "sp basic" 

9999 SAVE "SENSO PLUS" LINE 2 



1 REM 



UDG 



10 DATA 7,3 
5,255,224,248 
5,255 

20 DATA 255 
,31,7,255,255 
8,224 

30 DATA 1,3 
, 128, 192,224, 

40 DATA 255 
,255,254,252, 

50 DATA 0,0 
,0,0, 192, 240, 



1,63,127,127,255,25 
,252,254,254,255,25 

,255,255,127,127,63 
,255,254,254,252,24 

,7,15.31,63,127,255 
240, 248,252, 254, 255 
,127,63,31,15,7,3,1 
248,240/224,192,128 
,3,15,31,63,127,255 
248,252,254,255 



von Euch, die eine Runde geschafft haben, 
bekommen zusätzlich noch einen Bonus, 
der vom Level abhängig ist. So gibt es für 
jede Runde im ersten Level 1000, im zwei- 
ten 4000, im dritten 9000, im vierten 16000 
und im fünften gigantische 25000 Punkte. 
Für die Punktegeier unter Euch bietet das 
Programm .auch noch die fantastische 
Möglichkeit, den Gewinn jeder Runde 
(nicht der gesamte Score!) in einem 
Glücksspiel zu verdoppeln oder zu vervier- 
fachen. Will man verdoppeln, so muß man 
sich zwei der vier Farbfelder aussuchen. 
Wird dann eines der Felder ausgelost, so 
verdoppelt sich der Gewinn und wird zum 
Score aufgezählt. Entsprechendes gilt auch 
beim Vervierfachen, nur mit dem Unter- 
schied, daß hier nur ein- Feld ausgesucht 
werden darf. Hat man bei dem Glücksspiel 

60 DATA 255,127,63,31,15,3,0,0 
,255,254,252,248,240,192,0,0 

70 DATA 1,3,7,15,31,31,63,63,1 
28, 192,224,240,248,248,252,252 

80 DATA 63,63,31,31,15,7,3,1,2 
52 , 252 , 248, 248 , 240 , 224, 192 , 
90 LET sum=0 
100 FOR i=65368 TO 65495 
110 READ a: P0KE i,a: LET sum=s 
um+a 
120 NEXT i 

130 IF sum<>18562 THEN PRINT "F 
ehler in Data-Zeile!!!": STOP 
140 SAVE "sp udg"CODE 65368.128 
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1 REM 



SENSO PLUS 



2 border 0: paper 0: ink 7; 8 
right 0: inVerse o : flash 0: ove 
r 0: cls : restore 

5 POKE 23658,8 

8 LET w£="YOU HAVE BEEN AWARD 
ED A POSITION IN TODAY' S HALL OF 
FAME. PLEASE TYPE IN YOUR 
NAME AND THEN PRESS >ENTER< . 

10 LET a $-",i u": LET b$» ,, £«te " : 

LET c$="£.WmtfL" : LET d$="£MMNI 

B-; : LET e$ -"ia— — WH"; LET f$ 

=" ümmmmmmE" ■. let g$="£.pii(iP!ti" 

: LET h$="£»WWfcl": LET i$="k■lü ,l 
; LET j$="ük" 

15 data "Emmmmms.: 1 ,"* 

■ " "II W "cmWHMIMU" 

16 DATA 88, 136 '40, 88, 136,88,88 
,40 

17 let ^$=''mmmmmmiimmmmmm 



Pech, so wird der Gewinn der Runde (und 
der Bonus!) vom Score abgezogen. Also, 
seid vorsichtig! Außerdem kann man sich 
in den ersten zwei Levels zwei, in den an- 
deren drei Fehlversuche leisten. Aber dann 
heißt es endgültig „Game Over". Bleibt 
noch zu erwähnen, daß das Programm 
über Supergrafiken, eine Highscoreliste, 
ein Titelbild und eine integrierte Anlei- 
tung verfügt. Zudem kann SENSO PLUS 
parallel mit den Tasten 1-4 oder mit einem 
Kempston-Joystick gesteuert werden. Was 
will man mehr? Also, viel Spaß bei der 
Jagd nach Punkten mit SENSO PLUS! 



Zur Eingabe: 

Alle Programmteile mit GOTO 9999 der 
Reihe nach auf Kassette abspeichern. 

20 DIM r$(4,10) 
25 DIM t(5): LET t(l) -10000 
27 DIM n$(5,10): LET n$(l)-"MI 
CHAEL" * 

30 FOR i-1 TO 4: READ r$-(i): K 
EXT i 

35 GO SUB 8000 
40 CLS : BRIGHT 
50 PRINT INK 2; AT 3, ; "a" ;k$ ; " 
£*';AT 4, 31 ;"«B"; AT 5,31; "B»"; AT 
e.ai^'BC'.-ktd T0 4);AT 7,27;k$ 
(1 TO 4) ; "£>" 

60 INK 1: FOR i-4 TO 6: PRINT 
AT i,l;k$: NEXT i 

70 PRINT INK 2; PAPER 1 ; AT 7,5 
;"fi";AT 7,26;"B": PRINT AT 7,6;k 
$(1 TO 20) 

80 FOR i=B TO 16: PRINT INK 2; 
AT LS;"«"; AT i , 26 ; "■" : PRINT AT 
i,6;k$(l TO 20) : NEXT i 
90 PRINT AT 17,5; INK 2;"£";k$ 
(1 TO 20} ;"£" 
100 GO SUB 9 245 

110 INK 7: PAPER 1: PRINT AT 5, 
2;k$(l TO 11) ; "MENUE" ;K*U TO 12 
) 
120 FOR i-1 TO 3: PRINT AT i*2 + 

8,11;" " ; i : NEXT i 

130 PRINT AT 10.7; "START GAME"; 
AT 12,7; "INSTRUCTIONS"; AT 14,7;" 
EXIT" 

140 PRINT INK 5; AT 8,9; "PLEASE 
CHOOSE ; " 

145 PRINT AT 0,5; INK 4; PAPER 
0; "PRESS ANY KEY OR FIRE." 
150 FOR i=l TO 300 
160 IF INKEY$="1" THEN GO T0 80 



170 IF INKEY$="2" THEN GO TO 70 
00 
180 IF INKEY$="3" THEN RANDOMIZ 
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E USR 

190 IF IN 31=16 OR INKEY$>"4" T 
HEN GO TO 210 

200 NEXT i 

210 PAPER 0; GO SUB 8000 

220 GO TO 6110 

800 PAPER 0: PRINT AT 0,1; INVE 
RSE l ; "CHOOSE THE LEVEL (KEYS 1 
TO 5) " 

810 PAUSE 50: PAUSE 0: IF INKEY 
$>"5" OR INKEY$<"1" THEN GO TO 8 
10 

820 LET lev=VAL INKEY$ 

890 LET on off=0: LET sc=0: LET 

lastsc-0; LET trial-0: LET gewi 
nn=0; LET z=0 : LET atmax-INT (le 
v/3+2) : LET at=0 

900 INK 7: CLS : GO SUB 9245 

910 PRINT AT 11,6;"ATTEMPTS REM 
AINING:"; FLASH 1 ; atmax-at 

915 IF trialOO THEN IF trial/3 
-INT (trial/3) THEN LET lev-Iev+ 
1: IF lev>5 THEN LET lev=5 

920 PRINT AT 13,12; INK 5; M LEVE 
L: "; INVERSE 1; lev 

930 PRINT INK 1;AT 8,l;k$;AT 16 

1 ■ k$ 
'933 PRINT AT 0,5: BRIGHT 0; INK 

4; "PRESS ANY KEY OR FIRE." 

935 PAUSE 10: FOR i=l TO 65535 

937 IF INKEY$<> , " , OR IN 31-16 T 
HEN GO TO 942 

940 NEXT i: GO TO 937 

942 IF RND-. 0011291504 THEN RAN 
DOMIZE i 

945 LET trial=trial+l 

950 CLS : INK 1: GO SUB 9000 

960 INK 2: GO SUB 9010 

970 INK 4: GO SUB 9020 

980 INK 5: GO SUB 9030 

990 INK 7: GO SUB 9200 
1000 D1M f{24): LET an=lev*3+6: 
PRINT AT 20,28; INK 7; BRIGHT 1; 
lev; AT 20, 6; an 

1002 PRINT AT 2,2; INK 7; BRIGHT 
l;t(l) ;AT 19,28;trial 

1003 FOR h=l TO an 

1005 FOR 1-1 TO 100: NEXT 1: PRI 
NT AT 19,6; INK 7; BRIGHT l;h 
1010 FOR i=l TO h 
1020 IF f{i)=0 THEN LET f (i)-INT 

(RND*4)+1 
1023 LET il-f(i) 
1025 GO SUB 5000 
1050 NEXT i 
1500 FOR k-1 TO h 
1503 FOR 1-1 TO 100 
1505 IF IN 31=1 OR IN 31=2 OR IN 

31=4 OR IN 31-8 THEN GO TO 1530 
1507 IF INKEY$>"0" AND INKEY$<"5 
" THEN GO TO 1525 
1510 NEXT 1: GO TO 3000 
1525 LET il-VAL INKEY$ 
1530 IF IN 31=2 OR IN 31=4 THEN 
LET il=IN 31 

1540 IF IN 31=8 THEN LET il-1 
1550 IF IN 31=1 THEN LET il-3 
1560 IF ilOf(k) THEN GO TO 3000 
1570 GO SUB 5000 

1575 LET sc=sc+30*trial : PRINT A 
T 2,22; INK 7;sc 
1580 NEXT k 



1590 NEXT h 

2000 INK 7: FOR 1-1 TO 4: PRINT 
INK 5;AT 1+8, 11 ;r$ ( 1) : NEXT 1: P 
RINT AT 10,12; BRIGHT 0;"OK.BONU 
S":AT 11,14; BRIGHT l;lev~2*100Ü 

2001 BEEP .1,1: BEEP .1,4: BEEP 
.1,7: BEEP .2,9: PAUSE 10 

2003 FOR 1= lev* lev* 1000 TO 10* le 
v STEP -10* lev: LET sc=sc+10*lev 
: PRINT AT 11,14; 1;" " ;AT 2,22;S 
c: NEXT 1: PRINT AT 11,14; "0 ": 
PAUSE 80 

2009 LET srewinn=sc-lastsc 

2010 LET lastsc=sc 
2015 CLS 

2020 GO SUB 9245 
2030 GO SUB 9400 

2040 PRINT AT 9,4; "GEWINN RISKIE 
REN U/N] ?": BRIGHT 0: PRINT AT 
11,4; "GEWINN TRIAL ;";AT 11,1 
7;trial;AT 11 , 21 ;gewinn; AT 12,14 
; "SCORE: " ;SC 

2050 PAUSE 0: IF INKEY$<>"J" THE 
N GO TO 900 

2060 BRIGHT 1: FOR 1-9 TO 12: PR 
INT INK 0;AT 1.2;k$(l TO 28): NE 
XT 1: PRINT AT 10 , 3; "VERDOPPELN/ 
VERVIERFACHEN ?";AT 11,13; "[D/V] 

2070 PAUSE 0: IF- INKEY$<>"D" AND 

INKEY$<> ,, V" THEN GO TO 2070 
2075 LET z$="NUMBERS" : LET zz*=l : 
IF INKEY$="V" THEN LET Z$-"NUMB 
ER": LET zz=3 

2080 CLS ; INK 1: PRINT AT 0,0;" 
fl" ;k$(l TO 13);"tt";AT 0,17; "fi";k 
$(1 TO 13) ;"&" 

2083 FOR 1=1 TO 20: PRINT AT 1 , 
;"*";AT 1,31;"Ä ,, : NEXT 1 
2085 PRINT AT 21 , ; "£" ;k$ (1 TO 1 
3);"£";AT 21 , 17; "E" ;k$ ( 1 TO 13); 
"El"' 

2087 GO SUB 9245 

2090 INK 7: BRIGHT 0; PLOT 95,16 
: DRAW -71,71: DRAW 71,71: PLOT 
160,16: DRAW 71,71: DRAW -71,71 
2100 PLOT 176.24: DRAW 47,47: PL 
OT 223,104: DRAW -47,47: PLOT 79 
,24: DRAW -47,47: PLOT 31,104: D 
RAW 47,47: BRIGHT 1 
2110 PRINT INK 5;AT 7, 14; "NOW" ; A 
T 9,7;"CHOOSE THE ";Z$;AT 11.10; 
"FOR THE DRAW"; AT 13,6; INK 4; "P 
RESS Ä KEY OR FIRE" 
2120 IF INKEY$-"" AND IN 31016 
THEN GO TO 2120 

2130 PRINT INK 0;AT 7,14;" ";A 
T 9,7;" ";AT 11 

,10:" ";AT 13.6;" 

2140 INK 7: RESTORE 16 

2142 FOR 1-1 TO 4 

2144 READ a,b: PLOT a,b 

2146 DRAW 39,39: DRAW 39,-39: DR 

AW -39,-39: DRAW -39,39 

2148 NEXT 1 

2150 PRINT PAPER 5; INK 1;AT 4,1 

6;"1";AT 10,10;"2";AT 10,22;"3"; 

AT 16,16;"4" 

2153 PRINT AT 17,24; INK 5 ; "CHOO 

SEN";AT 18,23;z$;":" 

2155 DIM r(2) 



2160 FOR 1=1 TO LEN z$-5 

2170 PAUSE 

2180 IF INKEY$>"4" OR INKEY$<"1" 

THEN GO TO 2170 
2190 LET rU)=VAL INKEY$ 
2200 PRINT AT 19,21+1*2; FLASH 1 
;r(l) 

2210 NEXT 1 

2220 INK 0: FOR 1-9000 TO 9030 S 
TEP 10: GO SUB 1: NEXT 1: INK 7 
2230 PRINT AT 10,11; FLASH 1 ; " S 
TARTING ": PAUSE 50; PRINT AT 10 
,11; INK 0;" 
2240 FOR 1=1 TO 10 
2250 LET il-INT (RNDMJ+1 
2260 INK INT (il/3*4.5) 
2270 GO SUB i 1*10+8990: BEEP . 2- 
lev/30,il*4 

2280 INK 0: GO SUB i 1*10+8990 
2290 NEXT 1 

2300 INK INT (il/3*4.5): GO SUB 
11*10+8990: INK 7 

2310 PRINT AT 20, 22 ; "DRAWN: " ; IN 
VERSE l;il 
2320 PAUSE 100 
2330 CLS : GO SUB 9245 
2340 GO SUB 9400 
2350 IF il=r<l) OR il-r(2) THEN 
GO SUB 9500 

2360 IF ilOr(l) AND il<>r(2) TH 
EN GO SUB 9600 
2363 LET lastsc=*sc 
2365 GO SUB 9700 
2370 GO TO 900 

3000 FOR 1-4 TO 1 STEP -1: BEEP 
.1.1: NEXT 1 

3005 LET at=at+l: IF atOatmax T 
HEN LET trial=trial-l: GO TO 900 

3009 FOR 1=1 TO 4: PRINT INK 2;A 
T I+8,ll;r$U) : NEXT 1 

3010 INK 7: PRINT AT 10,12; FLAS 
Hl;" GAME ";AT 11,12;" OVER 

3110 FOR i-1 TO 200: IF INKEY$<> 
"" OR IN 31-16 THEN GO TO 3130 
3120 NEXT i 

3130 IF sc>t(5) THEN GO TO 6000 
3900 GO TO 40 
5000 FOR j-1 TO 2 
5010 LET on off=on off=0 
5020 INK INT (il/3*4.5) 
5030 IF on Off-l THEN INK 7: BRI 
GHT 1 

5040 GO SUB i 1*10+8990 
5045 IF on off-1 THEN BEEP .2-ie 
v/30,il*4 
5050 NEXT j 
5060 RETURN 
6000 CLS 

6010 PRINT AT 3,8; PAPER 5; INK 
1;" CONGRATULATION " 
6020 IF sc)t(l) THEN PRINT AT 6, 
8; PAPER 5; INK 0; FLASH 1 ; " NEW 
HIGH SCORE ": BEEP .15,4: BEEP 
»15,4: BEEP .15,4: BEEP .4,0 
6030 PRINT AT 8,31;" " 
6040 FOR i-1 TO 115 
6050 PRINT w$(i);: BEEP .005,12 
6055. IF i/32 = INT U/32) THEN PRI 
NT : PRINT 
6060 NEXT i 
6070 INPUT "NAME: "; LINE v$ 
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6080 POKE 23658,8 

6097 FOR ä-1 TO 5 

6098 LET t-t(i): LEX t$=n$(i) 

6099 1F sc>t(i) THEN LET t(i)-sc 
: LET n$(i)-v$: FOR j-Ci+1) T0 5 
: LET tl-t(j) : LET u*-n$(j) = LET 

t{j)»t! LET n«(j)-t$: LET t-tl : 
LET t$=u$: NEXT j: GO TO 6110 

6100 NEXT i 

6110 BRIGHT 0: BORDER 2: PAPER 2 

- CLS 

6115 PRINT INK 4; AT 0,5; "PRESS A 

NY KEY OR FIRE" 

6120 PRINT INK 3 ; AT 1 . ; "fi" ;k$ ; " 

£B";AT 2.31; "«i"; AT 3, 31'; "■1" ; AT 

4,31; , m: ,, ;k$;"£"; INK 0;AT 2,1; 
k$;AT 3,l;k$;AT 4,l;k$ 
6130 PRINT INK 7; PAPER ; AT 3,9 
; "»HALL OF FAMEB" 
6140 GO SUB 9245 

6150 INK 5: PRINT AT 8.5;"B";k$( 
1 TO 20) ; "ß" 

6160 FOR i-9 TO 19: PRINT AT i , 5 
;"■"; INK 7;k$(l TO 20); INK 5;" 
■": NEXT i 

6170 PRINT AT 20 ,5 ; "S" ;k$ £ 1 TO 2 
0) ; "£" 

6160 PAPER 7: INK 0: FOR i-1 TO 
5 

6190 PRINT AT i*2+8, 7; t { i );"... . 
. . . ";AT i*2+6,15;n$(i) 
6200 NEXT i 
6210 FOR i=l TO 400 
6220 IF INKEY$<>"" OR IN 31=16 T 
HEN GO TO 6240 
6230 NEXT i 

6 240 PAPER 0: BORDER 0: INK 7: G 
TO 40 

7000 PAPER 0: INK 6: BRIGHT 1: C 
LS : GO SUB 9245 

7010 PRINT AT 3,0; INVERSE 1 ; "WE 
SENTLICHES" 

7020 PRINT AT 5,0; "BEI SENSO FLU 
S -GEHT ES -WIE BEIMKLASS ISCHEN 
RGINAL- DARUM, EINE VOM COMPUTER 

VORGEGEBENE FARB-FOLGE NACHZUD 
RUECKEN. DIESE ER --WEITERTE VER 
SION NUN REIZT DIEMOEGLICHKEITE 
N DES BASISSPIELDURCH FOLGE 
NDE ERWEITERUNGENVOLL AUS:" 
7030 PRINT AT 15,0; INVERSE 1 ; "P 
UNKTE" 

7040 PRINT AT 17,0; "FUER JEDES R 
ICHTIG NACHGEDRUECK-TE FARBFELD 
ERHAELT DER SPIELERIN DER ERSTE 
N RUNDE 30 PUNKTE, INDER ZWEITEN 
RUNDE 60, DANN 90,USW" 
7050 GO SUB 9700: CLS : GO SUB 9 
245 

7060 PRINT AT 3 , ; "AUSSERDEM WIR 
D IHM FUER JEDE GE-SCHAFFTE RUND 
E EIN VOM LEVEL AB-HAENGIGER BON 
US AUFGEZAEHLT: "; INK 5 ; "LEV 

EL 1 1000 PUNKTELEV 

EL 2 4000 PUNKTELEV 

EL 3 9000 PUNKTELEV 

EL 4, 16000 PUNKTELEV 

EL 5 25000 PUNKTE" 

7065 INK 6: PRINT AT 13,0; INVER 
SE 1; "LEVEL" 

7070 PRINT AT 15,0; "IN LEVEL 1 M 
UESSEN 9 FARBFELDERNACHGEDRUECK 



T WERDEN , PRO LEVELKOMMEN DANN 
NOCH DREI WEITEREHINZU (LEVEL 
5: 21 FELDER) . DERSPIELER WAE 
HLT DAS LEVEL VORSPIELBEGINN 
SELBST, NACH JEWEILS" 
7090 GO SUB 9700: CLS : GO SUB 9 
245 

7100 PRINT AT 3,0; "3 RUNDEN JEDO 
CH ERHOEHT SICH DASLEVEL AUCH AU 
TOMAT 1 SCH UM E I NE STUFE . ' ' 
7110 PRINT AT 8,0; INVERSE 1 ; "GA 
ME OVER" 

7120 PRINT AT 10,0; "IN DEN LEVEL 
N 1 UND 2 HAT DERSPIELER PRO 
SPIEL ZWEI VERSUCHE , WENN ER EI 
NE FARBFOLGE FALSCHNACHDRUECKT, 
IN DEN LEVELN 3 BIS5 SIND ES DE 
REN 3 . BEI AUSREI -CHENDER PUNK 
TZAHL KANN SICH DERSPIELER NACH 

DEM SPIEL IN EINEBESTENLISTE 
EINTRAGEN. DIE FOLGE VON MENUE,HI 
GHSCORELISTE UND DEM TITELBILD 

KANN DURCH DRUECKENDER FEUER- O 
DER EINER ANDERENTASTE BESCHL 
EUNIGT WERDEN." 

7130 GO SUB 9700: CLS : GO SUB 9 
245 

7140 PRINT AT 3.0; INVERSE 1 ; "ST 
EUERUNG" 

7150 PRINT AT 5,0; "DAS SPIEL KAN 
N PARALLEL MIT DERTASTATUR (TAS 
TEN 1 - 4) ODER MITEINEM KEMPSTO 
N-KOMPATIBLEN JOY -STICK GESPIEL 
T WERDEN . FOLGENDEBELEGUNG GILT 

7160 PRINT AT 10,0; INK 5 ; "OBERE 
S FARBFELD: TASTE 1/ JOYSTICK 

NACH OBENLINKE 
S FARBFELD: TASTE 2/JOYSTICK 

NACH LINKSRECHT 
ES FARBFELD : TASTE 3 / JOY - 

STICK NACH RECHTSUNTER 
ES FARBFELD : TASTE 4 / JOY - 
STICK NACH UNTEN" 

7170 INK 7: GO SUB 9700: CLS : G 

O SUB 9245 

7180 INK 6: PRINT AT 3,0; INVERS 

E 1; "RISIKO" 

7190 PRINT AT 5,0;"EINE BESONDER 

S REIZVOLLE VARIAN-TE DIESES PRO 

GRAMMS IST DIE MOEGLI CHKEIT, DEN 

GEWINN JEDER RUNDE (NICHT DEN GE 
SAMTEN SCORE) ZU RISKIEREN. DA 
BEI MUSS DER SPIE -LER ZWEI (DOP 
PELTER GEWINN) , BZW. EINE FARBE W 
AEHLEN (VIERFACHER GEWINN) /DIE 
DURCH DIE ZAHLEN IBIS 4 CODIERT 

SIND. " 
7200 PRINT "WIRD EINE DER GEWAE 
HLTEN FARBENAUSGELOST, SO MULTIP 
LI ZIERT SICHDER GEWINN ENTSPRECH 
END .UND WIRD AUFGEZAEHLT, BEI FALS 
CH GEWAEHL -TEN FARBEN WIRD DE 
R GEWINN DERRUNDE VOM SCORE ABGE 
ZOGEN." 

7210 GO SUB 9700: BRIGHT 0: CLS 
: GO TO 40 

8000 CLS : INK 5: LET x=14: BRIG 
HT 1 

8010 PRINT AT 1,15; "1-J" 
8020 FOR i-1 TO 8: PRINT AT i+1. 



PRINT AT i 

i 



x;"E";k$(l TO i*2);"E" : LET x=x- 

1: NEXT i 

8030 PRINT AT 10 , 6 ; "ü" ;k$ ( 1 TO 1 

B);"fcl";AT ll,6;"ü";k$(l TO 18);" 

E" 

8040 LET x-12: FOR i-16 TO 2 STE 

P -2: PRINT AT x, x-5 : "S" ;k$ ( 1 TO 

i);"ü": LET x=x+l: NEXT i 
8050 PRINT AT 20.15; "HL" 
8060 INK 1 

8070 PRINT AT , ; "a" ;k$ ; "ß" 
8080 FOR i=l TO 21: PRINT AT i , 
;"1";AT 1,31;"»": NEXT i 
8090 PRINT AT 21 , ; "C" ;k$ ; "ü" ' 
8100 BRIGHT 0: INK 5 
8110 PRINT AT 2,3; 
AT 2,18;"£MMMM 
8120 FOR i=3 TO 18 
;"■."; AT i,28;"l": NEXT 
8130 PRINT A T 19, 3; "g 
; AT 1 y . 1 8 ; " EPMMMNHtL " 
8140 INK 7: BRIGHT 1 
8150 PRINT AT 4 ,5 ,- "a" ;k$ ( 1 TO 18 
);"E";AT 5 , 5 ; "GE." ; AT 6,6; "SE"; P 
APER 5; AT 6,11; "fite ME B»" ; PAP 
ER 0;AT 6,21;"E ABB"; AT 7,7; "SE" 
; PAPER 5; AT 7,11;"« ü ■ ■ SE" ; 
PAPER 0;AT 7,23; "■ «" 
8160 PRINT AT 8,8;"S"; PAPER 5;A 
T 8.9;"E ■ ■ U SE ■': PAPER 
;AT 8,25;"B";AT 9,5; "EM"; PAPER 

5; AT 9,8; "IQ QM ■ ■ E*Ii S" ; PA 
PER 0;AT 9,24; "■ti" 
8170 PRINT PAPER 5 ; AT 12,8; "fiBE 
■ II ):I:';AT i3.0;"l Uli 
SE"; PAPER 0;AT 14,8;"1"; PAPER 
5;AT 14,10;"B ■ ■■ SE" ; PAPER 

Q;AT 15, 8; "MC"; PAPER 5 ; AT 15, 
12; "lü Süß SS."; PAPER ; AT 15,2 
2;"£" 

8180 PRINT AT 16,8; "■".-AT 16,22; 
"SE";AT 17,8; "■ £B";k$(l TO 11); 
"Ei" 

8500 GO SUB 9245 
8510 FOR 1=1 TO 400 
8520 IF INKEY$<>"" OR IN 31 = 16 T 
HEN RETURN 
8530 NEXT 1 : RETURN 

8999 PAUSE 

9000 PRINT AT 0,15 ; a$ ; AT l,14;b$ 
;AT 2,13;c$;AT 3,12;d$;AT 4,ll;e 
$;AT 5,ll;f$;AT 6,12;g$;AT 7,13; 
h$;AT 8, 14; i$;AT 9,15;j$ 

9005 RETURN 

9010 PRINT AT 6 , 9 ; a$ ; AT 7,8;b$;A 
T 8,7;c$;AT 9,6;d$;AT 10,5;e$;AT 
ll,5;f$;AT 12,6;g$;AT 13,7;h$;A 
T 14,8; i*; AT 15 . 9 ; j $ 
9 015 RETURN 

9020 PRINT AT 6,21;a$;AT 7,20;b$ 
;AT 8,19;C$;AT 9,18;d$';AT 10,17; 
e$;AT ll,17;f$;AT 12,18;g$;AT 13 
,19;h$;AT 14,20;i$;AT 15,21;j$ 
9025 RETURN 

9030 PRINT AT 12,15;a$;AT 13,14; 
b$;AT 14,13;c$;AT 15,12;d$;AT 16 
,ll;e$;AT 17,ll;f$;AT 18,12;.g$;A 
T 19,13;b$;AT 20,14;i$;AT 21,15; 
,j$ 

9035 RETURN 
9 200 LET x=0 
9205 FOR i-1 TO 4 
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9210 PRINT INK 2 ; AT X,l;r$(i); B 

RIGHT 1;AT x,21;r$(i) 

9220 PRINT INK 5 ; AT 'x+18 . 1 ; r J { i ) 

; BRIGHT 1 ; AT x+18, 21 ; r$ ( i) 

9230 LET x=x+l 

9240 NEXT i 

9243 PRINT INK 7; BRIGHT ; AT 1, 

2; "HI -SCORE" ; AT 1,22; "SCORE"; AT 

19,2;"RUN";AT 20,3; "OF" ; AT 19,22 

;"TRIAL";AT 20, 22 ; "LEVEL" 

9245 PRINT IMK 7;#1;" SENSO+ © 

1987 BY MICHAEL "SUCK" 

9 250 RETURN 

9400 INK 2: PRINT AT 7,l;"a";k$( 

1 TO 28) ;*'£": FOR 1=8 TO 13; PRI 

NT AT 1,1;"«"; AT L, 30 ;'*■": NEXT 



1: PRINT AT lil;"C";W-(l TO 28) 

; ! 'D": INK 7 

9410 RETURN 

9500 PRINT PAPER 5; INK 2; FLASH 

1;AT 9,7;" CONGRATULATIONS! " 
9510 LET sc=sc+gewinn*22 
9520 BRIGHT 0: PRINT AT 11,9; "WI 
N: "; gewinn* zz 

9530 PRINT AT 12, 3; "NEW SCORE: " 
; SC 

9540 BEEP .1,1: BEEP .1,2: BEEP 
.1,3: BEEP ,1,1: BEEP .25,8 
9550 RETURN 

9600 PRINT INVERSE 1 ; AT 9,11;" S 
ORRY. . . " 
9610 LET scsc-aewinn 
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9620 BRIGHT 0: PRINT AT 11,8; "LO 

ST: " ; gewinn 

9630 PRINT AT 12,3; "NEW SCORE: " 

;sc 

9640 BEEP .2,4: BEEP .2,3: BEEP 

.2,2: BEEP .2,1: BEEP .4,0 

9650 RETURN 

9700 PRINT AT 0,5; BRIGHT 0; INK 

4; "PRESS ANY KEY OR FIRE." 
9710 IF INKEY$= , " , AND IN 31016 
THEN GO TO 9710 
9720 RETURN 
9999 SAVE "sp basic" LINE 2 

Ende des Listings 
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„Ein echter Scharfschütze weiß sich halt in jeder Situation zu helfen!** 



Hier kommt eine Erweiterung der Sport- 
Spiel-Sammlung; Shooting! Wie der Na- 
me schon sagt, handelt es sich bei Shoo- 
ting um eine Simulation eines Schießstan- 
des. Nachdem im Titelbild, in dem eine fet- 
zige Melodie ertönt, die Anzahl der Spieler 
(1- 4) festgelegt wurde, beginnt durch 
Drücken der Taste „2" das Spiel. Unter den 
Zielscheiben leuchtet dann eine Lampe 
auf, nun fahren Sie mit Ihrem Fadenkreuz 
auf die Zielscheibe und drücken ab. Haben 
Sie getroffen, dann bekommen Sie 250 
Punkte gutgeschrieben, 750 Punkte müs- 
sen innerhalb eines Durchgangs erreicht 
werden, um in den nächsten Level zu ge- 
langen. Damit das Ganze nicht so einfach 
ist, haben Sie zum Treffen nur eine be- 
stimmte Zeit zur Verfügung. Und, sind Sie 
einmal über das Ziel hinausgeschossen, 
dann können Sie nicht mehr zurück! Also, 
gut zielen und viel Glück! 

Zur Eingabe: 

Geben Sie Teil 1 ein, und speichern Sie ihn 
unter dem Namen „Shooting" ab. Nun Teil 
2 eintippen und unter „Gamel" abspei- 
chern. Das Programm kann nun mit 
RUN„S HO OTING" geladen und gestartet 
werden, 




Das Listing 4- ^ ^ * 
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SCHNEIDER LISTING MIT CHECKSUMMEN 
V 2.0 



**-*♦*###****#*#** 



SHDOTING 



(C> 19B7 BY 



MICHAEL KLEIN 



##♦******###****# 



***■ SYMBOLS *#* 



10B 

110 

120 

130 

140 

150 

160 

170 

1S0 

190 

200 

210 

220 RESTORE 3B0: SYMBOL AFTER 25 

6: MEMORY &6IA7: SYMBOL AFTER 42 

230 FÜR SYM=I TO 86 

240 FÜR SBS=B TO B: READ SYl*fSE 

S) :SY2<SBS>=VAL<"St"+SYl*(SBS) > s 

NEXT 

250 SYMBOL SY2 <0> ,SY2 ( 1 > ,SY2 <2> 

,SY2<3) ,SY2<4) ,SY2<5) ,SY2(6> ,SY 

2<7>,SY2(B) 

260 NEXT:POKE &BDEE ,&C9tCALL t(8 

B48:KEY DEF 66,0, 0,0,0 

270 ' 

280 ' *** PICTURE *** 

290 ' 

300 MODE s PEN 1: PAPER 01 BDRDER 

0j INK 8,0: INK 1,26:CLS 
310 LOCATE 5,12:FRINT"NaW LOADI 
NG" 

320 FOR L0C=1 TO 10: LOCATE 4+LO 
C,14sPRINT CHR*(231+L0C> ; sNEXT 
330 FOR L0C=1 TO 10; LOCATE 4+LO 
C,15:PRINT CHR* (241-M_0C> ; :NEXT 
340 GOSUB 1 33B: RUN"! GAME 1" 
350 ■• 

360 ' *## DATAS *** 
370 * 

380 DATA 2A,FE,C6,C2,C2,C2,E2,F 
E , 00 , 30 , FE , C6 , C2 , C2 , C2 , E2 , FE , 00 
370 DATA 31 , 1B,3B , 78, 18, 1 B , 1B,7 
E,B0,32,FE,C2,02,FE,C0,C2,FE,00 
400 DATA 33,FE,C2,B2,1E,02,C2,F 
E,00,34,C2,C2,C2,FE,02,02,02,00 
410 DATA 35,FE,C2,C0,FE,02,C2,F 
E , 00 , 36 , FE , C2 , CO , FE , C2 , C2 , FE , 00 
420 DATA 37, FE, C2, 04, BS, 18,16,1 
8,00,3B,FE,C2,C2,FE,C2,C2,FE,00 
430 DATA 39,FE,C2,C2,FE,02,C2,F 
E,00,41 ,FE,C2,C2,FE,C2,C2,C2,00 
440 DATA 42,FC,C2,C2,FC,C2,C2,F 
C,00,43,FE,C2,C0,C0,C0,C2,FE,00 
450 DATA 44,FC,C2,C2,C2,C2 t C2,F 
C , 00 , 45 , FE , C2 , G0 , F8 , CB , C2 , FE , 00 
460 DATA 46,FE,C2,C0,F8,C0,C0,C 
0,00,47,FE,C2,C0,C0,CE,C2,FE,00 
470 DATA 4B,C2,C2,C2,FE,C2,C2,C 
2, 00, 49, FE, 18,18,18,18,18, FE ,00 
480 DATA 4A,FE,C2,02,02,02,C2,7 
E,00,4B,C2 T C4 T C8,F0,CS,C4,C2,00 
490 DATA 4C,CB,C0,C0,C0,C0,C2,F 
E , 00 , 4D , FE , D2 , D2 , D2 , C2 , C2 , C2 , 00 
500 DATA 4E,FE,C2,C2,C2,C2,C2,C 
2,00,4F,FE,C2,C2,C2,C2,C2,FE,00 
510 DATA 50, FE, C2,C2, FE, C0,C0,C 
0,00,51 ,FE,C2,C2,C2,CA,C6,FE,00 
520 DATA 52,FE,C2,C2,FC,C2,C2,C 
2 , 00 , 53 , FE , C0 , C0 , FE , 02 ,C2 , FE , 00 
530 DATA 54,FE,DA,18,18,18,18,I 
B,0B,55,C2,C2,C2,C2,C2,C2,FE,00 
540 DATA 56,C2,C2,C2,C2,44,28 t l 
0,00,57,C2,C2,C2,D2,D2,D2,FE,00 
550 DATA 58, C2, 44, 28, 10, 23,44, C 
2,0B,59,C2,C2,C2,44,2B,10,10,00 
560 DATA 5A,FE,C4,08,10,2B,42,F 
E,0B,61,01,03,07,0F,1F,3F,7F,FF 



fGKJ 
tEL> 
CLFT 
CEJ> 
tFAJ 
iEHJ 
UKJ 
£EF> 
tGC? 
CCO> 
tJA> 
£DJ> 

CFL> 
<II> 



CBJJ 

CHLJ 

CBPJ 
<!DDJ 
fDG> 
<:08J 

tBBJ 

<JP> 

OFJ 

£MK> 
{NPJ 
tDEJ 
CKJ> 
tDCJ 

{EP> 

{OD} 

tOP> 

{AL> 

<DJ> 

tJN> 

CPJ} 

{NPJ 

CSD} 

(KKJ 

CPM> 

<LH> 

tPKJ 

{GCJ 

tAHJ 

<CL> 

<LH> 

{PA> 



570 DATA 62,BB,C0,E0,FB,FB,FC,F 

E, FF, 63, FF, FF, FF, FF, FF, FF, FF, FF tED> 

5B0 DATA 64,18,18,3C f 3C,7E,7G,F 

F,FF,65,FF,FF,7E,7E,3C,3C,18,18 {D03 

590 DATA 66,FF,7F,3F,1F,0F,07,B 

3,01 ,67,FF,FE,FC,FB,F0,E0,C0,B0 CNNJ 

600 DATA 6B,0F,0F,BF,00,0F,08,0 

F,0F,69,FB,F0,F0,0B,F0,00,F0,F0 <GB> 

610 DATA 6A, FF, FF, FF, 00, FF, 00, F 

F , FF , 6B , 1 F , 1 F , 3F , 3F , 7F , 7F , FF , FF < IG> 

620 DATA 6C,FB,FB,FC,FC,FE,FE,F 

F, FF, 6D, 00, 00, 65, 55,65, 55, 67, 00 {DM> 

630 DATA 6E, 00, 00, 44,44,44, 44, 7 

7, 00, 6F, 00, 00, 6E, 44, 64 ,44 ,64, 00 CMFJ 

640 DATA 70,00,00,00,00,01,03,0 

7 T 0F,71,1B,3C,7E,FF,FF,FF,FF,FF tAJ> 

650 DATA 72, 00, 00, 00, 00, 80, C0,E 

, F0 , 73 , 00 , 01 , 07 , BF , 3F , 1 F , 07 , 00 U1LJ 

660 DATA 74,B0,C0,F0,FC,FE,FB,E 

, C0 , 75 , BB , 77 , 57 , 77 , 77 , 77 , 57 , 77 <EM> 

670 DATA 76", 00, 00, AA, 00, 00, 00, A 

A, 00, 77, 00, 75, 45, 77, 15,75,00,00 CNDJ 

6B0 DATA 78,00,77,55,55,55,77,0 

0,00, 79, 00, 75, 25, 25, 25, 25, 00, BB £EF> 

690 DATA 7A,00,2E,AB,EA,6A,2E,0 

0,0P!,7B,0B,EE,8A,EE,2B,E8,00,B0 WO 

700 DATA 7C,BB,CE,AS,AC,AB,CE,0 

0,00,7D,00,EE,BA,CA,BA,EA,00,00 CGGJ 

710 DATA EB, 00, 00, 01, Bl, 01, 01,0 

1,00,E9,7C,FE,FF,C0,C0,C0,FC,FE tBCJ 

720 DATA EA,1 1,31, 71, 71 ,71 ,71, 7 

F,7F,EB,07,BF,DF,DC,DC,DC,DC,DC CLA> 

730 DATA EC,C1,E3,F7,77,77,77,7 

7,77,ED,F0,F8,FD, IC, IC, IC, IC, IC CJK> 

740 DATA EE,7C, FE, FF, 38,38,38, 3 

8, 3B,EF, 11,33,77,77,77,77,77,77 CMIJ 

750 DATA F0,F0,F8,FD,1D,1D T 1D,1 

D , 1D , F l , 7C , FE , FF , C0 , C0 , C0 , CC , DE CEP} 

760 DATA F2, 00, 00, 00, 00, 01, 00,0 

0,0B,F3,7F,B7,07,07,FF,FE,7C,00 CBB> 

770 DATA F4,7F,71,71,71,71,31,1 

1,00,F5,DC,DC,DC,OC,DF,8F,07,00 <BB> 

780 DATA F6,77,77,77,77,F7,E3,C 

1,00,F7,1C,1C, 1C,1C,FC,FB,F0,00 CDM> 

790 DATA FB, 38, 38, 38,38,38,38,1 

, 00 , F9 , 77 , 77 , 77 , 77 , 77 , 63 , 4 1 , 00 tEA J 

800 DATA FA,!D,ID,1D,1D, 10,19,1 

B,0B,FB,CF,C7,C7,C7,FF,FE,7C,BB £AE> 

810 DATA 61A8 CEA> 

820 DATA 3E,01,CD,DE,BB,DD,5E,B 

, DD , 56 , 1 , DD , 6E , 02 , DD , 66 , 03 , 22 tOP> 

830 DATA 75,A4,EB,E5,D5,CD,F0,B 

C,D1,E1,FE ( 0B,CB,23,23,7C,FE,01 COM} 

840 DATA 20, 05,70, FE, 90, 28, OB, E 

5,D5,CD,F0,BB,D1,E1,FE,0B,2B,E9 {AK} 

850 DATA 2B,2B,D5,1B,1B,7A,FE,F 

F,28,0B,E5,D5,CD,F0,BB,Dl,£i,FE CEF} 

860 DATA D0,28,EE,13,13,DD,E1,D 

5, DD, E5, Dl, 13,1 3, 7A, FE, 02, 20, 05 tMKJ 

870 DATA 7B,FE,B0,28,0B,E5,D5,C 

D,F0,BB,D1,E1,FE,00 T 2B,E<?, 1B,1B CJNJ 

880 DATA E5,CD,EA,BB,E1 ,D1 ,E5,C 

D,F6,BB,2A,75,A4,D1 ,EB,2B,2B,7C tMNJ 

B90 DATA FE,FF,CB,D5,E5,CD,F0,B 

B,E1 ,D1 ,FE,00,C0, 1B,AB,3A,77,A4 f!B> 

900 DATA 47,2A,75,A4,EB,CD,0A,6 

3,2A,79,A4,2B,7C,B5,20,FB,3E,12 fCI> 

910 DATA CD,1E,BB,28,13,3E,01,3 

2,78,A4,2A,75,A4,EB,3A,77,A4,47 £HK> 

<?20 DATA CD,0A,63,C3,C7,62,3E,2 

F,CD, 1E,BB,2S, 10,CD,BB,62,2A,75 tNOJ 

930 DATA A4,EB,3A,77,A4,47,CD,0 

A,63,18,C7,CD,7D,63,CB,67,28,12 CCO> 

940 DATA 3E,00,32,78,A4,2A,75,A 

4,EB,3A,77,A4,47,CD,0A,63, 18,35 tKJ} 

950 DATA FE,00,2B,AA,FS,2A,7S,A 

4,EB,D5,3A,77,A4,47,C5,CD,BA,63 tEDJ 

960 DATA D1,5A,C1 ,F 1 ,CD,D3,62,7 

B, 32, 77, A4, 60, 69, 22, 75, A4 ,EB, 47 CGK5 

970 DATA CD, 0A, 63, 18, 85, 11, 00, C 

0,21,10,64,01,00,40,ED,B0,C9,21 tPHJ 

9B0 DATA 00, C0, 11, 10, 64, 01 ,00, 4 

0,ED,B0,C9,57,CB,5A,28,0C,B3,78 C0F3 



990 DATA FE, 01, 20, 06, 79, FE, 40, 2 

0,01 ,0B,CB,52,28,0C,0B,78,FE,FF 

1000 DATA 20, 06, 79, EF, FF, 20, 01, 

03,CB,42,2B,07, 1D,7B,FE,FF,20 ,0 

1 

1010 DATA 1C,CB,4A,CB,1C,7B,FE, 

C7,D8, 1E,C7,C?,21,00,CB,D5,7B,C 

B 

1020 DATA 3F,CB,3F,CB,3F, 11,50, 

00, F5, FE, 00, 28, 04, 19, 30,20, FC, F 

1 

1030 DATA CB,27,CB,27,CB,27,57, 

78, B7,9A,1 1,00, 08, FE, 00,28, 04,1 

1040 DATA 3D,20,FC,D1,7B,E6,03, 

CB,3A,CB,1B,CB,3B,19,DD,21,10,A 

4 

1050 DATA 11, 18, 00, FE, 00, 28, 05, 

DD,19,3D,20,FB,2B,CD,29,BC,CD,2 

9 

1060 DATA BC,CD,29,B0,06,0B,DD, 

7E,00,AE,77,23,DD,7E,01,AE,77,2 

3 

1070 DATA DD,7E,02,AE,77,2B,2B, 

CD, 26, BC, DD, 23, DD, 23, DD, 23, 10, E 

2 

1080 DATA C9,06,05,16,00,1E,01, 

DD,21,70,A4 t DD,7E,B0,DD,23,CD,l 

E 

1090 DATA BB,2B,03,7A,B3,57,CB, 

23,I0,EF,7A,C9,BB,00 

1100 DATA A410 

1110 DATA 00,14,00,00,02,01,02, 

0B, B4, 14, 04, 00, 02, 01, 04, 14 ,00,0 



1120 DATA 00,01,01,01,01,01,01, 

01,04,04, 14,14,04,01,04,01,14,1 

4 

1130 DATA 14, 05, 01, FF, 00, 00, 00, 

00,00,00,00,00,00,00,00,00,70,8 

3 * 

1140 DATA 00,0C,9F,00,04,BE,00, 

08, 9F, 00, 02, B3, 00,06,83,00, 10, B 

E 

1150 DATA 00, 10, 00, 00,02, B3, 00, 

02,B3,00,02,B3,00,04,B3,00,06,B 

E 

1160 DATA BB,04,BE,00,04,EF,B0, 

04, EF, 00, 04, 00, 00, 02, B3, 00, 02, B 

1170 DATA 00,02,B3,00,04,B3,00, 
06,BE,00,B4,BE,00,04,EF,00,04,E 
F 

11B0 DATA 00,04,00,00,30,00,00, 
20, FF, 00, 00, 00, 00, 00, 00, 00, 00,0 


1190 DATA 00, 00, 00, 00, BB, 00, 00, 
00,00,00,00,00,00,00,00,00,00,0 


1200 DATA 00,A4DB 

1210 DATA 00,00,40,BE,00,0C,9F, 
00 , 04 , 9F , 00 , 08 , BE , 00 , 02 , D5 , 00 , B 
4 

1220 DATA EF,00,12,BE,00,0C,7F, 
00,04,77,BB,08,7F,B0,02,8E,B0,0 
6 

1230 DATA 8E,00,10,9F,00,10,B0, 
00,02,8E,00,02,8E,B0,02,8E,00,0 
4 

1240 DATA 8E,00,06,9F,00,B4,9F, 
00, 04, BE, 00, 04, EF, 00, 04, 00, 00,0 
2 

1250 DATA BE,00,02,BE,00,02,BE, 
00,B4,8E,0B,06,9F,00,04,9F,00,0 
4 

1260 DATA BE,00,04,EF,00,04,BE, 
00,0C,B3,BB,04,9F,00,0S,BE,B0,0 
2 

1270 DATA 86,00,04,7F,00, 12, 9F, 
•00, 08, FD, 00, 04^EE, 00, 14, FF, 00,0 


12(30 DATA 00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,0 



{FN> 



CLA> 



<CEJ 



<GI> 



{MNJ 



{KB} 



{CH> 



(BDJ 



fOB> 



<BL> 



fOIJ 
{AM> 



<EOJ 



<BA> 



tJH> 



tIP> 



(JN> 



<HP> 



<NP> 
<AD> 



{DA? 



{BK> 



^GD> 



{HIJ 



tHE5 



tFB> 



{MK> 



Computronic 



o <:nl> 

1290 DATA 00,00,00,80,00,00,00, 

00 {CPJ 

1300 ' (AFI 

1310 ' **« POKE *#» CPJ> 

1 320 ' CAB} 

1330 RESTORE 810 <FNJ 

1340 READ PDK*:PaK=VOL("* t "+POK* 

>;0N ERROR GOTO 1370 CBDJ 

1350 READ BIT*:BIT=VAL<"«<"+BIT* 

) : IF BIT<0 OR BIT>255 THEN POK«= 

BIT: GOTO 135B {AN> 

1360 POKE POK,BITtPaK=sPOK+ltQOT 

O 1350 CDU 

1370 RETURN {CN> 

ENDE DES LISTINGS 



♦ ♦♦ 1W12 ♦♦♦ 



SCHNEIDER LISTING MIT CHECKSUMMEN 
V 2.0 



(C) 19B7 BY 



MICHAEL KLEIN * 



***##**#*#*»#»*** 



100 ' ***#*##*****#*##* 

IIB ' * * 

120 ' #5HOGTIN6* 

130 ' * * 

110 ' 

150 ■ 

160 ' 

170 ' 

1B0 ' 

190 ' 

200 * *#* INIT I »** 

210 ' 

220 RESTORE 3010: FOR BES=1 TO 1 

0:READ SCR (BES> ,NAM* (BES) :NEXT: 

TOP=BCR < 1 ) 

230 DIM REP*(34,12) ,TON(40) : RES 

TORE 2970: POKE S.A604,B 

240 FÜR KIC~! TD 33: READ XPO,YP 

O ,SYM* : KEP* < XFU , YPÖ) =SYM*: NEXT 

250 PLA=lsNUM=l:ANZ=0:LIM=750 

260 ENV 1 ,100,-2,6 

270 ' 

2O0 ' **# TITLE *** 

290 ' 

300 FOR 5CR=25 TO 1 STEP-1:0ÜT 

S<E»Cta0,&:OUT &BD00, SCR: CALL &BD1 

9s NEXT t MODE 1 

31B PEN 1: PAPER 0:BORDER 0sCLS 

320 INK 0,0: INK 1,26: INK 2,11:1 

NK 3,9 

330 LOG ATE 1 2 , 1 : PRINT"MCSOFTY P 

REGENT": LOCATE 5,25: FRINT"COPYR 

IGHT 19Q7 BY MICHAEL KLEIN" 

340 PLGT 0,30,1: DRAW 622 V 30:PLO 

T 0,368: DRAW 622,368 

350 WINDOWS 1,1 , 39, 3, S: PAPER«! ,2 

:CLB#1 

360 WINDaW»2,l,39,9,14:PAPER«2, 

3:CLB#2 

370 PLOT 0,174,1: DRAW 622,174 

390 PAPER 2s PEN 0: LOCHTE 2,3: PR 

!NT"ac:ccccccca:cccL[:(;c(:cc[:ccci:c 

cccccccccb" : PAPER BjPEN 1 

390 LOCATE 2,4:PRINT STRINS*(37 

,32):LOCATE 2,10:PRINT STRING* ( 

37 , 32) ; 

400 LDCATE 2,5:PRINT" accb d d 

accb accb acb d accb accb "; 
410 LDCATE 2,6:PRINT" c c c 

ccceccccc "j 
420 LOCATE 2,7:PRINT" fccb tccc 

c cc c c c c ccfb"; 
430 LOCATE 2, Bi PRINT" c c c 

c cc c c cc cc c"; 
440 LOCATE 2,9:PRINT" fccq e> e 

fccg fccg e e e e -fccg "; 

450 LOCATE U,11:PRINT LOCA 

TE 28,U:PRINT" ":LOCATE 8,14: 
PRINT" "jLOCATE 25,14:PR 
INT" 



tGKJ 
CELJ 
tLFJ 
CEJ> 
CFAJ 
CEHJ 
C1KJ 
CEFJ 
CGC} 
CCO> 
CLGJ 
<DJ> 



CCJJ 

tLI> 

<<3B> 
{F03 
tJMl 
CDDJ 
CDU 
tDBJ 



tMMJ 
fDAJ 

CKHJ 

{PIJ 

tBO> 

CCF> 

{CK} 
TBP> 

<FCJ 

CGF> 
CHJ> 
CHE> 
{AN} 
CCN> 
<BA> 

CJE> 



460 PAPER 3jPEN 0: LOCATE 9,12;P 
RINT"accccb": LOCATE 26, 12: PRINT 
"accccb" 

470 LOCATE B, 13: PRINT"ac:ct;c:ccb" 
sLOCATE 2S,13!pRINT"accccccb":P 
EN 1: PAPER . 
480 FOR BUL=2 TO 36 STEP 34 
490 PEN 2: PAPER 0: LOCATE BUL,16 
; PRI NT" pqr": LOCATE BUL, 17:PRINT 
"hji": LOCATE BUL,1B:PRINT CHR* ( 
138) CHR* (143) CHR* (133) : LOCATE B 
UL,19:PRINT"kcl ":PAPER 2: PEN 1: 
LOCATE BUL, 20 : PRI NT "mno"; PAPER 
0:PEN 2:LQCATE BUL, 21 :PR1NT" j j j 
"; LOCATE BUL, 22: PRINT" j j j " 
500 LOCATE BUL+1,23:PRINT CHR* ( 
208) :NEXT BUL 

510 PLOT 32,36B:DRAW 16,352:DRA 
W 606,352: DRAW 590,368:PLOT 606 
,352: DRAW 606,240: DRAU 16,240: D 
RAW 16,352: PLOT 160, 240: DRAW 16 
0,206: DRAW 190,206: DRAW 190,240 
520 PLOT 112,174,1:DRAW 112,192 
:DRAW 239, 192: DRAW 239, 174: PLOT 

112,192:DRAW 142,222:DRAW 159, 
222: PLGT 192,222: DRAW 208,222: D 
RAW 239,192 

530 PLOT 432,240,1: DRAW 432,206 
;DRAW 462, 206: DRAW 462, 240: PLOT 

385, 174: DRAW 3B5,192:DRAW 510, 
I92:DRAW 510,174:PLOT 3B5,192:D 
RAW 415,222: DRAW 432,222: PLOT 4 
62,222: DRAW 4B0, 222: DRAW 510,19 
2 

540 PAPER 3: PEN 1 : LOCATE 19,12: 
PRI NT" TOP "-.LDCATE IB,13:PRINT U 
5ING" *■*##*"; TOP: PAPER OsPLOT 10 
,174,1; DRAW 77,240: PLOT 614,174 
:DRAW 548,240 

550 LOCATE 7 , 16:PRINT'SELECT NU 
MBER OF PLAYERS *"; s PRINT USING 
"#";PLA 

560 LOCATE B, 18: PRINT "START SHO 
OTING CONTESTANT" 
570 LOCATE 9 ,20« PRINT"SEE WORLD 

BEST SHOOTERS" 
SBB LOCATE 10, 22:PRINT"FINISH T 
HE >SHOOTING<" 

590 FDR SCR=1 TO 25 i OUT &BC00,6 
:OUT &BD00, SCR: CALL &BD19SNEXT: 
GOSUB 2690 

600 IF INKEY (64 )=0 THEN PLA=PLA 
+1:A£N=1:IF PLA>4 THEN PLA=1 
610 IF AEN=1 THEN AEN=0: LOCATE 
33, 16: PRINT US I NG "#"; PLA: SOUND 
1,200,23,15, l:FOR WAI-1 TO 200: 
NEXT 

620 IF INKEY (653=0 THEN NUM=1:S 
CD=0:GOTO 1670 

630 IF INKEY (57) =0 THEN SEE=1:G 
OTÜ 1B20 

640 IF INKEY (56) =0 THEN POKE ErB 
ESA, &C7: GOTO 100 
650 GOTO 600 
660 ' 

670 ' *** INIT 2 *** 
6G0 ' 

690 ROU=1:BUL=9:TLV=70:PUN=0 
700 BEL=200:BER=440:BZL=10B:BZR 
-540 

710 FKX=166:FKY=180:TRF=0 
720 SHR=B:STE=0:SHO=0 
730 PLOT 1000,1000,1 
740 XPO=0:TEY=160:TX(0>=17S:TX( 
1 )=207:TX (2>=239: TX (3)=271:TX (4 
>=303:TX(5)=335:TX(6)=367:TX(7) 
-399: TX (8) =431 : TX (9>=463 
750 ' 

760 * *#* SHOOTING GRAPIC *** 
770 ' 

780 FOR SCR=25 TO 1 STEP- 1: OUT 
«.BC00,6:ÜUT &BD00, SCR: CALL «.BDI 
9: NEXT 



CKLJ 



{CM> 
CBKJ 



<FN> 
CFDJ 



<FJ> 



tOBJ 



CAKJ 



{DJ> 

tFG> 
CIA> 
<BC> 
CDLJ 

CHF> 
tDDJ 

<HPJ 

{ID> 

iOO> 

CCCJ 
CBF> 
CDG> 
tOOJ 
CDE> 
{JDJ 

tEL> 

CBN> 
CMA> 
<BDJ 



tCCJ 
CDU 
<BPJ 
<DG> 



tONJ 



790 MODE 1: PAPER 0s PEN 1 : CLS CJH> 
B00 IF PEEK(&A604>O25S THEN PO 
KE &A6B4, 255: GOTO 810 ELSE CALL 

&62BB: GOSUB 2580: FOR SCR=1 TO 
25:0UT SiBC00,6!OUT 8.BD00.SCR: CA 
LL &BD19: NEXT: GOTO 1100 CCL3 

810 LOCATE 4,l:PRINT"SHOOTING ( 
C> I9B7 BY MICHAEL KLEIN" COBJ 
820 LOCATE 4,25t PRINT"UP SCORE 

ROUNDS BULLETS" CEH} 

830 GOSUB 2SB0 CMEJ 

G40 WINDOW#1,1,40,3,14:PAPER«1, 
2:CLS*1 CAPJ 

850 WINDOW#2,1,40,15,23:PAPER#2 
,3:CLStt2 tCDJ 

860 PLOT 0,30,llDRAW 640,30: PLO 
T 0,368-.DRAW 640,368:PLOT 0,174 
,0:DRAW 640,174 {NBJ 

B70 FOR BRG=0 TO 100: PLOT BEL.l 
76, 3: DRAW BEL, 176+STEt PLOT BER, 
176: DRAW BER, 176+STE: STE=STE+IN 
T (RND#3) : BEL=BEL-2: BER=BER+2:NE 
XT:STE=0 COD} 

880 FOR BRG=0 TO 110: PLOT BZL,1 
76,3:DRAW B2L, 176+STE:PLOT BZR, 
176: DRAW BZR, 176+STE: STE=STE+ IN 
T (RND*3. 5) : BZL=BZL+2: BZR=BZR-2: 
NEXT {DJJ 

B9B PAPER 2: PEN 1 s LOCATE 2,5:PR 
INT "5t": LOCATE 7, 10:PRINT"«;t " :L 
OCATE 33,9:PRINT"st":L0CATE 15, 
4:PRINT"Bt":L0CATE 27,6s PRINT"fi 
t":LOCATE 37 ,4 : PRI NT" st " <MD3 

900 FOR ZAU=1 TO 40: LOCATE ZAU, 
14:PRINT CHR*(22> j CHR* ( 1 ) ;CHR*( 
15); CHR* ( 1 > ; CHR* (117); CHR* (8 > J C 
HR* (15) ;CHR*(0) ; CHR* ( 1 18) ;CHR*( 
22) ; CHR* (0) ;: NEXT: PEN 1 CEI3 

910 L0K=-17sF0R SCS=1 TO 2iLÜK= 
LGK+21:FGR STA=LOK TP LOK+10 ST 
EP 5 tDOl 

920 PAPER 3: PEN 0: LOCATE STA, 13 
:PRINT CHR* (142) CHR* (143) CHR* (1 
41):L0CATE STA,14:PRINT STRING* 
(3,143) : LOCATE STA, 15: PRINT CHR 
*( 139) CHR* (143) CHR* (135) : LOCATE 

STA+ 1,16s PRINT CHR*(149) CDA> 

930 PAPER 1:FEN 0: LOCATE STA+1 , 
17: PRINT CHR* (145): PAPER 3: PEN 
1: LOCATE STA, 17: PRINT CHR* (214) 
;LOCATE STA+2, 17:PRINT CHR*(215 
) JLOCATE STA, 18: PRINT STRING* (3 
,131):PEN 0: LOCATE STA+1, 19: PRI 
NT CHR* (231) Uli 

940 NEXT: NEXT: PEN 0: LOCATE 19,1 
3: PRINT CHR* (142) CHR* (143) CHR* ( 
143) CHR* ( 141 )j LOCATE 19,15:PRIN 
t CHR* (139) CHR* (143) CHR* ( 143) CH 
R*(135):PEN 1 : PAPER 0: LOCATE 19 
, 14: PRI NT "wKyz": PAPER 3sPEN 0:L 
OCATE 20,16:PRINT CHR* ( 1495 CHR* 
(149) CDJ> 

950 PAPER ls LOCATE 20, 17: PRINT 
CHR* ( 145) CHR* (145) : PAPER 3: PEN 
1: LOCATE 19,17:PRINT CHR* (214): 
LOCATE 22, 17: PRINT CHR*(215):L0 
GATE 19,18:PRINT STRING* (4 , 131 ) tED> 
960 RESTORE 303B:FOR SHE-1 TO 6 
:READ XPO,ZXP,LOC(SHE):TRY(SHE) 
=lB4:TRX(SHE)=XPO {IK> 

970 FOR KRE=ZXP TO XPO+1 STEP-5 
. S5: KZX=XPO: KZ Y=lB4i KRX=KRE: KRY 
=184 CEE> 

980 RAS=SQR((KRX-KZX> A 2+(KRY-KZ 
Y>^2) :ORIGIN KZX,KZY CMJJ 

990 DEP=PI/RAS;KRX=RA5sKRY=0:MD 
VER KRX,KRY:FOR KRS=1 TO RAS+2 CPD3 
1000 KRX=KRX-KRY*DEP:KRY=KRY+KR 
X*DEP:pRAW KRX,KRY,1 {M0> 

1010 KRY=KRY+KRX*DEP;KRX=KRX-KR 
Y«DEP:DRAW KRX,KRY,1 " <KF> 

1020 NEXT: NEXT: NEXT {CO 

1030 ORIGIN 0,0: FOR SHE=1 TO 6: 



38 



Computronlc 



PLOT TRX (SHE) ,TRY(SHE) , 1 : NEXT tBJJ 

1040 FOR SCR=1 TD 25: OUT &BC00, 

6 s OUT &BD00, SCR: CALL &BD 19s NEXT {JK3 

1050 FLX=320:FLY=60sSHE=0:<TII , 1=0 

: GOSUB 1500 {DE} 

1060 PLDT PLX-4,PLY,2:PL0T PLX- 

2,PLYaPLOT PLX+3, PLY i PLOT FLX+5 

, PLY: PLOT PLX,PLY-4:PLGT PLX, PL 

Y-2:PLOT PLX, PL Y+2: PLOT PLX,PLY 

+4: CALL &62C7 CDEJ 

1070 ' tAHJ 

1080 ' *** MAIN PART *#* CGBJ 

1090 ' {PJ} 

1100 IF SHE=0 THEN GOSUB 1230 {GO} 

1110 IF SHE>0 THEN TIM=TIM+lsIF 

TIM>=TLV THEN BOT=0: GDTO 1330 CJNJ 
1120 ALX=PLX:ALY=PLY CEF> 

1130 IF SHE<4 THEN RIX=-8 ELSE 
RIX=8 CHGJ 

1140 IF(JOY<0)AND 4) -4 THEN IF 
PLX>4 AND PLX<636 THEN PLX=PLX+ 
RIX:BEW=I CNB> 

1150 IF(JOY<0) AND 8) =8 THEN IF 
PLX<636 AND PLX>4 THEN PLX=*>LX+ 
RIX:BEW=1 <PI> 

1160 IF(JOY(0)AND 1)=1 THEN IF 
PLY<210 THEN PLY=PLY+4: BEW=1 CMAJ 
1170 IF<JOY(0)AND I6)=16 AND SO 
T=0 THEN GDSUB 1410:SDT=t {DA} 
1180 IF BEW=1 THEN PLOT ALX-4,A 
LY,FLl:PLOT ALX-2,ALY,PL2: PLOT 
ALX+3,ALY,PL3sPL0T ALX+5,ALY,PL 
4:PLOT ALX,ALY-4,PL5:PL0T ALX,A 
LY-2,PL6:PL0T ALX,ALY+2,PL7:PLD 
T ALX,ALY+4,PLB tDE> 

1190 IF BEW=1 THEN GOSUB 1S00:P 
LOT PLX-4,PLY,2:PLDT PLX -2, PLY: 
PLOT PLX +3, PLY: PLOT PLX+5,PLY:P 
LOT PLX,PLY-4:PL0T PLX,PLY-2:PL 
DT PLX, PL Y+2: PLOT PLX ,PLY+4: BEW 
=0 COHJ 

1200 IF SOT=l THEN TIM=100:5CO1 
= 1: GOSUB 2590 tJGJ 

1210 IF GAC=i AND SHE=0 THEN 15 
60 tJS> 

1220 GGTO 1100 tOO 

1230 ' {AB} 

1240 ' *** TARGET *»* tCE> 

1250 ' ««» 

1260 SHE=INT(RND#8) : IF SHE>6 CR 

SHE<1 THEN 1260 tLDJ 

1270 SOUND 1,100,30,13,1 tPGJ 

1280 PAPER 3: PEN ls LDCATE LOC (S 
HE), 19: PRINT CHR* (231 ): ä PAPER CIPJ 
1290 RETURN {CA} 

1 300 ' <AP } 

1310 ' »*# TIME *** {NFJ 

1320 * {AB} 

1330 PAPER 3: PEN 0ILOCATE LDCtS 
HE),19:PRINT CHR*(23U ; jPEN 1 tFNJ 
1340 SXP=5HE: SHE =0: PLOT PLX-4.P 
LY,PL1:PLGT PLX-2,FLY,PL2iPLOT 
PLX+3, PLY, PL3: PLOT PLX+5,PLY,PL ■ 
4 -.PLOT PLX,PLY-4,PL5:PLDT PLX.P 
LY-2,PL6:PL0T PLX ,PLY+2,PL7: PLO 
T PLX,PLY+4,PLB tMFJ 

1350 PLX=320: PL Y=60: GOSUB 1500: 
PLOT PLX-4,PLY,2:PL0T PLX-2,PLY 
:PLOT PLX+3, PLY: PLOT PLX+5.FLY: 
PLOT PLX, PL Y-4: PLOT PLX,PLY-2:P 
LOT PLX, PLY+2s PLOT PLX,PLY+4 {KM} 
1360 BUL=BUL-1: GOSUB 2640 {NE} 
1370 TIM=0:FGR WA1<=1 TD 300: NEX 
T:GOTO 1210 {DI} 

13B0 ' tAHJ 

1390 ' **# HIT PR FAIL **# <FMJ 
1400 ' {AO> 

1410 IF PLX>TRX(SHE>-20 AND PLY 
>TRY<SHE)-20 AND PLX<TRX 15HE) +2 
AND PLY<TRY(SHE>+20 THEN SCO- 
SC0+25:PUN=PUN+25 £JP> 

1420 IF PLX>TRX<SHE)-15 AND PLY 
>TRY<SHE)-15 AND PLX<TRX (SHE) +1 
S AND PLY<TRY<SHE>+15 THEN SCO= 



SCO+25: PUN=PUN+25 

143B IF PLX>TRX(SHE)-10 AND PLY 
>TRY(SHE)-10 AND PLX<TRX (SHE) +1 
AND PLY<TRY(SHE>+10 THEN SCQ= 
SCO+25 s PUN=PUN+25 
144B IF PLX>TRX(SHE)-5 AND PLY> 
TRY(SHE>~5 AND PLX<TRX (SHE) +5 A 
ND PLY<TRY(SHE)+5 THEN SCO=SC0+ 
25;PUN=PUN+25 

1450 IF PLX>TRX<SHE)-2 AND PLY> 
TRY(SHE>-2 AND PLX<TRX (SHE) +2 A 
ND PLY<TRY(SHE)+2 THEN SCO-SCO+ 
150s PUN=PUN+ 150 

1460 SOUND 4,250,35,15, 1,0, B: RE 
TURN 
1470 ' 

1480 ' *#* TESTS PLAYER **» 
1490 ' 

1500 PLt=TEST(PLX-4,PLY):PL2=TE 
ST(PLX-2,PLY) :PL3=TE5T (PLX+3, PL 
Y)3PL4=TE5T(PLX+5,PLY> 
1510 PL5=T£ST (PLX ,PLY~4) ; PL6=TE 
ST(PLX,PLY-2) :PL7=TEST(PLX,PLY+ 
2) sPLB=TEST(PLX,PLY+4) 
1520 RETURN 
1530 - 

1540 ' **« NEXT ROUND #** 
1550 ' 

1560 6AO=0: IF PUN<LIM THEN 1640 
1570 ROU=RDU+1:BUL=9:TLV=TLV~10 
: PUN=0 

1580 FOR 5CR=2S TO 1 STEP- ls OUT 
&BC00,6:OUT StBD00, SCR: CALL feBD 
19:NEXT 

1590 SHE=0:TIM=0s GOSUB 25BO 
1600 FOR SCR=1 TO 25: OUT &BC00, 
6: OUT &BD00, SCR: CALL &BD19iNEXT 
: GOTO 1 100 
1610 ' 

1620 * *** NEXT PLAYER *** 
1630 ' 

1640 IF NUM<PLA THEN 1660 
1650 SCO (NUM)=SC0:GAD=2s GDSUB 2 
220: GOSUB 1690; IF PLA>1 THEN GO 
TO 2300 ELSE 270 

1660 SCOCNUM>=BCO:SCO=0:GAO=0sG 
DSUB 1690s NUM-NUM+1 
1670 CLS: PAPER 0iPEN l:LOCATE 1 
1 ,13:PRINT"GET READY PLAYER #"| 
:FRINT USING"#";NUM 
1680 FOR WAI=1 TO 2000: NEXT: BOT 
O 690 
1690 ' 

1700 ' *** TOP TEN *** 
1710 " 

1720 IF SCOtNUMXSCRtl0)THEN RE 
TURN 

1730 FOR CHE=1 TO 7 
1740 IF SCR ( CHE > >SCO(NUM) THEN 1 
7B0 

1750 FOR PUS=10 TD CHE+1 STEP-1 
1760 SCR(PUS)=SCR(PUS-1) :NAM*(P 
US) =NAN* (PUS-1 ) : NEXT 
1770 ZAL=CHE: GOTO 1B20 
1780 NEXT:ZAL=10 
1790 ' 

1B00 ' *#* GRAPHIC TOP TEN *** 
1010 ' 

1B20 FOR SCR=25 TO STEP-1 : OUT 
feBC00,6:OUT &BD00, SCR s CALL RBD 
19:NEXT 

1830 »ODE ls PAPER 0: PEN 2: CLS 
1840 RESTORE 290B: XPG=2: YPO=l 
1S50 READ SYM:LOCATE XPD,YPO;PR 
INT CHR*(BYM) ; 

1860 XP0=XP0+1:IF XP0=39 THEN X 
PO=2:YPU=YPD+1j IF YPO=4 THEN 18 
B0 

1870 GOTO 1850 

1880 PEN l:PLOT 0,342,1:DRAW 61 
6,342 

1870 LDCATE 5,6:PRINT"A 
D E F G H I J K" 



<KC> 



<CNJ 



{BMJ 



CDG> 

CAG> 
tAD> 
{PKJ 
tAF> 



tEF> 



{BI> 
tACJ 
tABJ 
<PM> 
<!B0> 

tDB> 



CCI1 
{KU 



CGKJ 
tAL> 
{EC> 
<AN5 
tDO 



tHGJ 

CHKJ 
CAD> 
CJB> 
CAO> 

<IC> 
tNU 

CGH> 
tEB> 

CMB> 
CEPJ 
CBJ> 
CABJ 
tDE> 



(HC} 
<KE> 
CAL? 

<G0> 



<PD> 



{HFJ 



B C 
LDCATE 



5,9:PR1NT"L M N D P O R 
5 T U V";sLDCATE 5,12sPRINT 
"WXYZCl-.tl 
j"; CLLJ 

1900 IF SEE=1 THEN PEN 2:LOCATE 

10,14:PRINT"CONTINUE WITH BUTT 
ON. ":PEN lsGOTO 1930 tCI> 

1910 LÖCATE 17,14:PRINT">":L0CA 

TE 18,15:PRINT" " <KO> 

1920 SCR(ZAL)=SCO!NUM) :NAM*<ZAL 
>='"• <EAJ 

1930 YPO-17sFOR PRI=1 TO 5 fMEJ 
1940 LOCATE 4,YPO:PRINT USING"# 

";PRIi :PRINT". " : :PRINT" ■ — " 

;:LOCATE 7,YPQ:PRINT USING"!c";N 
AH*(FRI);:LOCATE 13, YPOs PRINT" 
"; : PRINT U5ING"**###"; SCR (PRI ) : 
YP0=YP0+2:NEXT tfiE> 

1950 YP0=17sFOR PR1=6 TO 10 CEDJ 
1960 LOCATE 21,YPD:PRINT USING" 

##•' ; PRI ; : PRINT" . " ; :PRINT" 

-";:LOCATE 25, YPO: PRINT USING"& 

M ;NAM*(PRI);:LOCATE 31,YP0sPRIN 

T" ";:PRINT USING" **#*#"; SCR (PR 

I ) : YPO=YP0+2; NEXT COAJ 

1970 IF FIN=1 THEN PEN 2: LOCATE 

10,14:PRINT"CONTINUE WITH BUTT 
ON. ":PEN l-.LOCATE 1Q,15;PRINT" 

":WHILE JOY(0)OI6:WEND:FI 
N=0: RETURN CCCJ 

1780 IF SEE=1 THEN FOR SCR=0 TO 

25s OUT S.BC00,6sOUT 5(6000, SCR :C 
ALL &BD19:NEXT CGO 

1990 IF SEE=1 THEN SEE=0:WHILE 
jaY<0)O16!WEND:GOTO 290 CMNJ 

2000 FOR SCR=0 TO 2S: OUT &BC00, 
6: OUT «(BD00, SCR: CALL &BD 19s NEXT CFIi 
20 1 REX=4 : REY=4 : B5A=- 1 : NAM*= " " 
:LOCATE 18,14:PRINT" "; tEO} 
2020 RPX=REX*16-8:RPY=(25-REY)* 
16-8 tFFJ 

2030 RDX=RPX:^OY=RFY:PLOT RPX,R 
PY,lcDRAK RPX+2B,RPY:DRAW RPX+2 
8,RPY~32:DRAW RPX,RPY-32: DRAW R 
FX.RPY fBC} 

2040 FOR WAI=1 TO 100: NEXT {FH> 
2050 IF JDY(0)=1 AND REY>5 THEN 

REY=REY-3 1 BEW= 1 {HL > 

2060 IF JOY(0>=2 AND REY<10 THE 
N REY-REY+3:BEW=1 {JC1 

2070 IF JOY(0)=4 AND REX>4 THEN 

REX=REX-3:BEW=1 CGO> 

2080 IF JOY(0)=9 AND REX<34 THE 
N REX=REX+3:BEW=1 CHP> 

2090 IF JOY<0)=16 THEN BEW=2 <NK> 
2100 IF BEW>0 THEN 2110 ELSE 20 
50 tSA> 

2110 PLOT ROX,ROY,0:DRAW ROX+28 
,ROY:DRAW ROX+2B , ROY-32: DRAM RO 
X,ROY-32:DRAW ROX,ROY {NA> 

2120 IF BEW<2 THEN BEW=0:GOTO 2 
020 ELSE BEW=0:GOTO 2130 {EM} 

2130 IF LEN(NAM*)<6 THEN 2140 E 
LSE 2180 {JFJ 

2140 IF REP*(REX,REY+1X>"<"THE 
N 2150 ELSE 2180 {HI} 

21S0 IF REP*(REX,REY+1)^"#"THEN 

NAH*=NAM*+" ":BSA=B5A+1:G0TD 2 
180 tEB} 

2160 IF REP*(REX,REY-H)=' , ="THEN 

NAM*(ZAL)=NAM*5FIN=liGQT0 1930 {HM> 
2170 NflM*=NA«*+REP*(REX,REY+l) : 
BSA=BSA+1 <EB> 

2180 IF REP*CREX,REY+1)="<"THEN 

NAM*=LEFT*(NAN*,BSA) sBSA=SSA~l {ED} 
2190 IF REP* (REX,REY+1)="="THEN 

NAM*(ZAL>=NAM*:FIN=l:GOTO 1930 tFN} 
22ßß SOUND 1 ,300,20, 15, lsFOR WA 
1=1 TO 250: NEXT {DB> 

2210 LOCATE 18, 14: PRINT" 
■;:LGCATE 18,14:PRINT USING"?<"|N 
AN*: BOT O 2020 CHK} 

2220 * {AD} 
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2230 ' *** GAME OVER *** tIH> 
2240 ' £AFJ 

2250 WIND0W#4 f li,3B,i2,14sPAPER 
#4,0:CLS#4 fMCJ 

2260 LOCATE 13, 13: PEN li PAPER 8 
jPFUNT"G A M E D V E R" tEDJ 

2270 PLOT 160,222, 1 : DRAW 47B„22 
2:DRAW 47S,176:DRAW 16B,176sDRA 
W 160,222 tLKJ 

2280 FGR Wfll=l TO 2000: NEXT CEE! 
22?0 1F SAD=2 THEN GAG=0: RETURN tUJ 
2300 ' {All 

2310 ' **# END PICTURE **W CBAJ 
2320 * IAO 

2330 FOR SCR=25 TO 1 STEP~1:GUT 
S<BC00,6:DUT «tBD00,SCR;CALL &BD 

19; NEXT 0>E> 

2340 MODE liCLS CGB> 

2350 LOCATE 5,1 SPRINT" HERE ARE 

THE FINAL STANDINGS I " ; tBKJ 

2360 LOCATE 4,25:PRINT M SHaaTING 

(C) 19B7 BY MICHAEL KLEIN"; UD3 
2370 PLOT 0,30,1: DRAW 640, 30s PL 
DT 0,362; DRAW 640,362 tPM3 

2380 BC(l)=SCa(l) sSC(2)=SC0(2) s 
BC(3)=5C0(3) iBC(4)=SC0(4) {ItO 

2390 FGR AUS=1 TB PLA {EB3 

2400 NUM(AUS)=MAX(SC<1) ,SC(2> ,5 
C(3),5C(4)> {NK3 

2410 ANZ=ANZ+1 {FOD 

2420 IF NUM C AUS >=SCGU> THEN RAN 

<1)=ANZ:SCC1)=0 CCI3 

2430 IF NUM(AUS>=BCG(2)THEN RAN 

<2)=ANZ:SC<2)=0 tL03 

2440 IF NUM(AU5>=SCD(3)THEN RAN 

(3)=ANZ:SC<3)=0 " CGM3 

2450 IF NUM {AUS) =SCOt4) THEN RAN 

(4)=ANZ:SC<4)=0 «3C3 

2460 NEXT <BI3 

2470 LOCATE 3 ,7j PRINT" IUP SETS 
"; SPRINT USING"#*##*"5SCO<l> jsP 
RINT" POINTS. THIS IS RANK ";:PR 
INT USING"#";RAN<I); {OGJ 

24B0 LOCATE 3 , 10: PRINT"2UP GETB 
" ; : PR INT USING"**###" ; SCO (2) s t 
PRINT" POINTS- THIS IS RANK ";:P 
RINT LISINO"*" ; RAN (2>; tGHJ 

2490 LOCATE 3, 13sPRINT"3UP GETS 
"; :PRINT U5I NB" *♦**#") 5CD (3) ;: 
PRINT" POINTS. THIS IS RANK H jiP 
RINT USING"#";RAN(3>( tKKJ 

2500 LOCATE 3,16:PRINT"4UP GETS 
"; SPRINT UBINB "***##"; SCO (4) ;i 
PRINT" POINTS. THIB IS RANK ";sP 
RINT UBING"#";RAN(4>; CPCJ 

2510 LOCATE 11 ,20:PRINT"CDNTINU 
E WITH BUTTON" <KJ} 

2520 FOR SCR=1 TO 25: OUT ÄBC00, 



6:0UT !,BD00,SCRsCALL «tBDl«?: NEXT <BE> 
2530 IF JOY(0)=16 THEN 250 ELSE 

CALL SiBB06:GOTa 2530 tAFJ 

2540 LOCATE 1,10s END tMLJ 

2550 ' <ABJ 

2560 ' *** SCORING #** <KHJ 

2570 ' CAD> 

25G0 PEN 1: PAPER 0; LOCATE 3,25: 
PRINT USING"#";NUM tIDJ 

2590 IF SCO>='?99'?9 THEN SCO=999 
99 ELSE IF SCO<=0 THEN SCO=0 tKH> 
2600 IF SCO>TOP THEN TQP=SCO tHG> 
2610 PEN 1: PAPER 0: LOCATE 13,25 
sFRINT USING"**tt##"ä.SCO: IF SCOi 
=1 THEN SCO1=0: RETURN <FB> 

2620 IF R0U>=99 THEN RGU=99 ELS 
E IF RDU<=0 THEN ROU=0 (N£> 

2630 PEN 1: PAPER 0; LOCATE 26,25 
:PRINT UBING"**":ROU: IF ROUl=l 
THEN ROU1=0: RETURN <EC> 

2640 IF BUL>=*99 T.HEN RUL=99 ELS 
E IF BUL<0 THEN BUL=0:GAD=1 , <GP> 
2650 PEN li PAPER 0: LOCATE 37,25 
: PRINT USING"**";BUL: RETURN <NFJ 
2660 ' tADJ 

2670 ' **# MUSIC PART *** tAFJ 
2680 ' <AF> 

2690 IN*=INKEY*s IF IN*<>""THEN 
2690 ELSE SPE=B:RESTDRE 2B60 {ENJ 
2700 ENV 5,3,5,1,15,-1,3:ENV 6, 
5,3,1,15,-1,5 <BB> 

2710 FOR BAC=1 TO 15: READ TON(B 
AOsNEXT <DB> 

2720 STA=20:ADR3=42000:ADR2=420 
50sADRl=42200»ADR4=42020 WPi 

2730 IF(SD<4)AND !tXlll>^4 THEN 
GOSUB 27B0 {DD* 

2740 IF(SQtl)AND «(Xlll)=4 THEN 
GOSUB 2B20 {DO> 

2750 IF<SQ(2)AND 8tXlll)=4 THEN 
GOSUB 2B40 <DAJ 

2760 IF INKEY*<>""THEN RETURN <EC> 
2770 GOTO 2730 tBF> 

2780 SOUND 4,T0N<STA+PEEK<ADR3) 
> , 2*SPE, 0,5,0, PEEK (ADR3+UsfiDR3 
=ADR3+2sIF ADR3>42015 THEN ADR3 
=42000: GOSUB 2B00 OJ> 

2790 RETURN {BMJ 

2800 STA=PEEK(ADR4> sADR4=ADR4+l 
:IF STA=255 THEN ADR4=42019sGOT 
D 2B00 tICJ 

2810 RETURN {PL> 

2B20 SDUND 1 ,PEEK (ADR1 i +256*PEE 
K(ADR1+1) ,PEEK(ADRl+2)*SPE,0,6s 
ADR1=ADR1+3:IF PEEK < ADR 1 ) =255 T 
HEN ADR 1=42200 {MO 

2B30 RETURN {AFJ 

2B40 SOUND 2,PEEK<ADR2>+256*PEE 



K ( ADR2+ 1 ) , PEEK ( ADR2+2 ) *SPE ,0,6t 
ADR2=ADR2+3s IF PEEK (ADR2) =255 T 
HEN ADR2=42050 {QL> 

2850 RETURN {BP> 

2B60 DATA 965,851,758,716,638,5 
68,506,478,426, 379, 358,319,284, 
255,239 *CJ> 

2B70 ' {PM> 

2BB0 ' #** DAT AS FOR PICTURES 
*** <GMJ 

2B90 * <AGJ 

2900 DATA 140,140,132,140,140,1 
32, 140, 140, 132, 140, 140, 132,032, 
140,140,132,132 {CBJ 

2910 DATA 032,132,140,140,132,1 
40,140,132,140,140,132,140,140, 

132.140.140.132 tBO 
2920 DATA 140,140,132,141,140,1 

29, 141 , 140,032, 141 , 140, 132,032, 
133,032,032,141 tBIJ 

2930 DATA 140,132,141,140,133,1 
33,032, 133, 133,032, 133,032, 133, 
032,141,140,032 CAHJ 

2940 DATA 141,140,129,141,140,1 
32, 141 , 140, 133, 141 , 140, 132, 140, 

140.133.032.133 {FE3 
2950 DATA 032,032,140,140,133,1 
33,032,133,141,140,133,141,140, 
133,032,133,032 CDCJ 
2960 DATA 141,140,132,133,032,1 
33,140,140,133,000,000,000,000, 
000,000,000,000 {DFJ 
2970 DATA 4 , 5 , A,7,5,B, 10, 5, C, 13 
,5,D, 16,5,E,19,S,F,22,5,G,25,5, 

H, 28, 5, 1,31, 5, J {OIJ 

29B0 DATA 34, 5, K, 4, 8, L, 7,8, M, 10 

,B,N,13,B,0,16,8,P,19,8,Q,22,8, 
R,25,B,S,2B,8,T IBL> 

2990 DATA 31 ,S,U,34,B,V,4, 1 1 ,W, 
7,11,X,1B,11,Y,13, 11, Z, 16,11, t, 

19,11,3,22,11,- t {NBJ 

3000 DATA 25,11,. ,28, 11, #,31, 11 

,<, 34, 11, =,0,0, 0,0,0,0, 0,0, 0,0, 
0,0,0,0,0,0,0,0 {DE? 

3010 DATA 495B, MCS. . . , 4500, HEIK 
O. ,3975, DUSSEL, 3675, MI CHI. ,3425 

.DONALD tPOl 

3020 DATA 2975, DETTO. , 2375, MCS. 

. . , 1825,KINB-2, 1325, FUNBOY, 0850 

, SONNY. tDJI 

3030 DATA 73,91,5,153,171,10,23 
3,251 , 15,409,427,26,489,507,31 , 
569,5B7,36 CGD3 
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Steuern sie ein, mit einem Raketenruck- 
sack ausgerüstetes Männchen sicher über 
die Oberfläche eines gefährlichen Plane- 
ten. Sie müssen nämlich Items, welche sich 
auf dem Grund verschiedener Schluchten 
befinden, aufsammeln. In jedem Bild sind 
drei Items aufzusammeln, bevor man ins 
nächste Level gelangt. Doch Vorsicht! Zu 
beginn des Spiels fällt das Männchen im 
wahrsten Sinne des Wortes aus den Wol- 
ken. Die Steuerung erfolgt mit dem Joy- 
stick. Wollen Sie ein laufendes Spiel abbre- 
chen, so drücken Sie die DEL-Taste. Wer 
genügend Punkte erziehlt hat, der kann 



sich in die High-Score-Liste eintragen. Be- 
vor man dies allerdings tun kann, muß die 
Taste „CAPS LOCK" betätigt werden. 

Zur Eingabe: 

Das Spiel besteht aus zwei Teilen. Teil 1 
eintippen und unter dem Namen ORBIT 
abspeichern. Teil 2 eingeben, zur Sicher- 
heit abspeichern, und ihn anschließend 
mit RUN starten, damit die vom Hauptpro- 
gramm benötigten Daten abgespeichert 
werden. Anschließen kann Teil 1 geladen 
und gestartet werden. Der Rest erfolgt 
dann automatisch. 
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1210 WIMDOW#l , 17,20, 11 , 14i title 
*="ORBIT CHICAN" 


CLN} 


1430 ENV 4,3 
1440 'Symbol 


,-3,25 


{GN} 
{ES} 






»• T&fi ^ 












■>-■■■;■.■ 


1220 FÜR 1=0 TG 128 STEP 2 


CCFJ 


1450 SYMBOL 


33,8,B,8,8,8,0,B,0 


{11} 








1230 t TOP, l, HS: SOUND 1,0,3,4,, 




1460 SYMBOL 


34,20,20,20,0,0,0,0 




SCHNEIDER LIST INS MIT CHECKEUMMEN 


i l 


CNO> 


,0 




<HJ> 




V 2.0 




1240 IF 1>24 AND 1 MOD B=0 THEN 




1470 SYMBOL 


35,20,20,62,20,62,2 




1000 




{FG} 


LOCATE I/8,12:PRINT MID*(title 




0,20,0 
14B0 SYMBOL 


36,8,30,40,20,10,60 


{IL} 




* f 1/8-3, 1) } : ! BIS, 1/3, 12, 1: SOUND 






1010 


' ORBIT CHICANE 


tAL> 


2,177,3,6 


CDA} 


,9,0 




{NK} 


1020 


■ — (c) Juni 1987 by: — 


{GL} 


1250 !CL.TÖP,1 ^lSrNEXTjCLStt^L 




1490 SYMBOL 


37,0,66,68,8,16,34, 




1030 




— 


{HBJ 


OCATE 17,12iPRINT"E" 


CEKJ 


66,0 




{PG} 




1040 


' Thomas Ratthof* 


{DN} 


1260 IBIG, 17, 12, 1j IBUFFERt !HLT, 




1500 SYMBOL 


30,0,16,40,18,44,76 




1050 


■ und 


<GJ} 


4;CLS 


CPM} 


,50,0 




{IO} 


1060 


' Alexander Stroh 


{JN} 


1270 'Defining part 


{NE! 


1510 SYMBOL 


39, 8, B, 16 


{EJ} 


1070 




{HF} 


1200 DEFINT a-z;DEFREAL s 


tAE} 


1520 SYMBOL 


40,4,8, 16, 16, 16,8,4 






10B0 


' Musie and other 


tCF> 


1290 SYMBOL RFTER 32 


CLI} 


,0 




OK} 


1090 


' special ef-fects 


{OB} 


1300 OPENIN"!octop.fil" 


{NfO 


1530 SYMBOL 


41,16,8,4,4,4,8,16, 




1100 


' Thomas Ratthof i 


{FK} 


1310 FOR i=l TO 10 


{KD} 







{BB} 


1110 




{PI} 


1320 INPUT#9,s(i) 


{G01 


■1540 SYMBOL 


42 , , 36 , 24 , 126 , 24 , 3 






1120 


' Graphics and MC 


{HI? 


1330 INPUTt»9.na<n*<i> 


{HK> 


6,0,0 




{JK> 


1130 


' Alexander Stroh 


{ED} 


1340 INPUT»9,day*<i> 


£CJ3 


1550 SYMBOL 


43, 0, 8,8, 62, B, 8, 0,0 


{KE> 


1140 




fHD} 


1350 NEXTsCLOSEIN 


{CG} 


1560 SYMBOL 


44,0,0,0,0,0,8,8,16 


{CHJ 




1150 


' PREPARiNG PARTS 


CDI} 


1360 DIM e (16) ,ix (2,9) ,iy (2,9) 


{PC} 


1570 SYMBOL 


45,0,0,3,62,0,0,0,0 


{ÜE> 


1160 


'Welcome 


{FE} 


1370 DIM cal*(2) ,ra(n*<9) ,lev$(3 




1503 SYMBOL 


46,0,0,0,0,0,0,8,0 


tKK} 


J 170 


SYMBOL AFTER 256: MEMORY StB 




) ,null*<6) 


{PD> 


1590 SYMBOL 


47,0,2,4,0,16,32,64 




FFF 




{HP} 


13B0 SPEED INK 4,4 


tGN> 


,0 




{NL> 


1180 


LOAC" ! ocode" : CALL &9C00 


{Fa> 


1390 ENT-1, 2,. t ,3,2,-1,3 


{CP} 


•1600 SYMBOL 


4& s 62 , 34 , 34 , 34 , 34 , 3 




1190 


GDSUB 2810= BORDER 0= MODE 




1 400 ENV 1,1,-2,1 


{NH> 


4,62,0 




{EB} 


: PAPER GiüCLSsPEN 4 


CKL} 


1410 ENV 2,2,-1,2 


{BO} 


1610 SYMBOL 


49,2,2,2,2,2,2,2,0 


CFPJ 


1200 


IMK 4,26,2; INK 13, 6; SPEED 




1420 ENV 3,1,14,1,1,0,10,14,-1, 




1620 SYMBOL 


53,62,2,2,62,32,32, 




INK 5,5 


tHH} 


3 


CPP> 


62,0 ■ 




<BC> 



ai 



1630 SYMBOL 51,62,2,2,62,2,2,62 

,0 {0B> 

1640 SYMBOL 52,32,32,40,62,0,8, 

B,0 CGCJ 

1650 SYMBOL 53,62,32,32,62,2,2, 

62,0 £OCJ 

1660 GYMBOL 54,62,32,32,62,34,3 

4,62,0 CIBJ 

1670 SYMBOL 55,62,2,2,2,2,2,2,0 CBEJ 

1680 SYMBOL 56,62,34,34,62,34,3 

4,62,0 CLNJ 

1690 SYMBOL 57,62,34,34,62,2,2, 

62,0 COOJ 

1700 SYMBOL 58,0,0,8,8,0,8,0,0 {NP> 

1710 SYMBOL 59, 0,0, 8, 8, 0,B, 0,16 CAKJ 

1720 SYMBOL 60,0, B, 16,32, 16, 8,0 

,0 {BA> 

1730 SYMBOL 61,0,0,62,0,62,0,0, 

£NDJ 

1740 SYMBOL 62,0,32,16,0,16,32, 

0,0 CF5J 

1750 SYMBOL 63,60,2,28,32,30,0, 

0,0 U_E> 

1760 SYMBOL 64,0,60,66,78,78,64 

,62,0 «_J3 

X770 SYMBOL 65,28,34,34,62,34,3 

4,34,0 CEM> 

1780 SYMBOL 66,60,34,34,60,34,3 

4,60,0 CBHJ 

1790 SYMBOL 67,30,32,32,32,32,3 

2,30,0 WO 

1800 SYMBOL 68,60,34,34,34,34,3 

4,63,0 {1N> 

1810 SYMBOL 69,62,32,32,56,32,3 

2,62,0 «DJ 

1B20 SYMBOL 70,62,32,32,56,32,3 

2,32,0 £OH> 

1830 SYMBOL 71,30,32,32,44,34,3 

4,28,0 £QC> 

1S40 SYMBOL 72,34,34,34,62,34,3 

4,34,0 {KB? 

1850 SYMBOL 73,62,8,8,0,8,8,62, 

{KD} 

1060 SYMBOL 74,2,2,2,2,2,34,28, 

CHMJ 

1870 SYMBOL 75, 34, 36, 40, 4B, 40, 3 

6,34,0 £KP1 

18B0 SYMBOL 76,32,32,32,32,32,3 

2,62,0 CDLJ 

1B90 SYMBOL 77,34,54,42,34,34,3 

4,34,0 ' CEF! 

1900 SYMBOL 78,34,50,42,38,34,3 

4,34,0 CEC* 

1910 SYMBOL 79, 2B, 34, 34, 34, 34, 3 

4,28,0 {PF} 

1920 SYMBOL 80,60,34,34,60,32,3 

2,32,0 {MG> 

1930 SYMBOL 81,28,34,34,34,42,3 

6,26,0 CNF> 

1940 SYMBOL 82,60,34,34,60,40,3 

6,34,0 CGBJ 

1950 SYMBOL 83, 30, 32, 32, 2B, 2, 2, 

60,0 {NFJ 

1960 SYMBOL B4,62,B,9,S,B,8,B,0 CIKJ 

1970 SYMBOL 85,34,34,34,34,34,3 

4,29,0 £BH> 

19B0 SYMBOL B6, 34, 34, 34, 34, 34, 2 

0,8,0 {LM> 

1990 SYMBOL 97,34,34,34,34,42,4 

2,20,0 CNPJ 

7000 SYMBOL BS, 34, 20, 8,8, 8, 20, 3 

4,0 £F0> 

2010 SYMBOL 89, 34,20, B,B,B,B,B, 

O CCO> 

2020 SYMBOL 90,62,2,4,8,16,32,6 

2,0 CIH> 

2030 'Arrays £CHJ 

2040 RESTURE 2050: FÜR 1=0 TO 9s 

READ cam*U>;NEXT CLN> 

2050 DATA TWIN ROCK,WHERE ALIEN 

S DIE {MAJ 

2060 DATA THE THIRD SCREEN.DEVI 

L'S CORNER <FE> 



2070 DATA HALF DOME 5, ORB IT ON 

TOP 

2080 DATA END OF HOPE.SKY GUNNE 

R 

2090 DATA FORGOTTEM PLATEAU, THE 

LAST FIGHT 
2100 FOR m=0 TO 9:F0R 1=0 TO 2 
2110 ix tI,m>=PEEK(3B464+m*6+l*2 
> 

2120 iyCl,m>=PEEK(38465+m*6+l*2 
) 

2130 NEXT l,miFOR 1-0 TO 16tc(I 
>=0:NEXT 

2140 FOR 1 = 1 TO 6snull*U)=STRI 
NG*(1,"0">:NEXT 

2150 lev*U>-="EASY"slev*(2)="HA 
LF":lev*(3)="HARD" 
2160 cd1*(1)="GREEN"(co1*(2)="C 
OLOR : ' : eol = l s 1 ev=l ineu=0 
2170 'Msnue 

21S0 ! BUFFER: GOSÜB 2940t PAPER 
:PEN ltMODE 1 

2190 LDCATE 18,4:PRINT"MENUE: " : 
!BIG,1B,4,6:PEN 2 
2200 LOCATE 7,7sPRINT" INSTRUCTI 

DNS " 

2210 LOCATE 7,9sPRINT"DEM0 

2220 LOCATE 7, 1 1 tPRINT"TOPTEN - 

2230 LOCATE 7, 13: PRI NT" MONI TOR 

CGREEN/CGLORJ " 

2240 LOCATE 7, 15: PRINT"5KILL LE 

VEL E 3 " 

2250 PEN 3: LOCATE 20,15: PRINT 1 

evt(lev) :PEN 2 

2260 LOCATE 7, 17: PRI NT" ST ART GA 

ME " 

2270 LOCATE 7, 19: PRI NT" END 

2280 PEN 3: FOR 1=7 TO 19 STEP 2 

:LOCATE 33,1 : PRINT <1+1 ) /2-3: NEX 

T 

2290 PEN 1:LQCATE 14,21 : PRINT"S 

ELECT OPTION; ": IBIB, 14,21 ,14 

2300 PEN 2s IF eol-1 THEN LDCATE 

22,I3:PRrNT coli < 2) : LOCATE 16, 
13 ELSE LOCATE 16,13:PRINT col* 
CD : LOCATE 22,13 
2310 PEN 3s PRINT col * (col > 
2320 INK l,6sINK 2,26» INK 3,15- 
(nal-l)*13 

2330 in =ABC < I NKEY*+CHR* ( ) ) : i n = 
in-48:IF in<i OR in>7 THEN 2330 
2340 IF in=l THEN 4310 
2350 IF in=2 THEN 3850 
2360 IF in=3 THEN GOSUB 3730: GO 
TO 2180 

2370 IF in<>4 THEN 2390 ELSE ca 
l=3-col:INK 3,15-(col-l>*I3:PEN 

2; IF col=l THEN LOCATE 22,13:P 
RINT cal*(2> : LOCATE 16,13 ELSE 
LOCATE 16, 13: PRINT col * <1 ) : LOCA 
TE 22,13 
238B PEN 3: PRINT col* (col ) s GOTO 

2330 
2390 IF in<>5 THEN 2410 ELSE le 
v=lev+l:lF lev>3 THEN Iev=l 
2400 PEN 3: LOCATE 20, 15: PRINT 1 
FV*(lev>:GOTQ 2330 
2410 IF in=6 THEN 1 iv=lev*2+l : i 
lip=6~2*lev:G0T0 2520 
2420 IF neii=0 THEN 2490 
2430 OPENOUT"octcip . -f i 1 " 
2440 FDR 1=1 TO 10 
2450 PRINT#9,5<1> 
2460 PRINT#9,n«<r»*(I) 
2470 FRINT#9,d»y*U) 
2480 NEXT:CLOSEOUT 
2490 CLS:CALL 8<BC02:PEN 1 
2500 CLEAR; SYMBOL AFTER 256lMQD 
E l! !READY:END 
2510 ' Screen 



<EI> 

<DL> 

tPMJ 
{PF} 

{JJ} 

{JI} 

tJCJ 

<PD> 

<HM> 

{AI} 
CEP} 

{GN} 

{JD1 

{IE} 

tDDJ 

{OL} 

tco> 

£HJ> 
<ID> 
<BF> 
{NM} 

{FI} 
{KJ} 



0_NJ 
<FK> 

{AK} 

{PC} 
{LOJ 
tLEJ 

tGF} 



{HD} 

{GH} 

<GK> 

tGO> 

{OL} 
t!K> 
{HB} 
tDF> 
{BP} 
<HN> 
{DM} 
{DF} 
{JB} 

<DG> 
CBG> 



2520 GOSUB 4260: IHLT, 4 i GOSUB 29 

40: GOSUB 3410 CDL> 

2530 PEN 3;L0CATE 1 ,21 tPRINT"SC 

DRE: ROUNDs LIVESs" CAE> 

2540 PEN 3: LOCATE 1 ,24:PRINT"HI 

-SC* ITEMSs BONUS:" {DO 

2550 PEN 1: LDCATE 1 ,22t PRI NT "00 

0000 000001 000004" {EFJ 

2560 PEN 1:L0CATE 1 ,25:PRINT"00 

0000 000003 000000"; <DI> 

2570 sch=s ( 1) : GOSUB 3200 UM} 

2500 b=0: sc =0jsbon=0: GOSUB 3270 {AM} 

2590 fa=b+l: GOSUB 3240 {IP} 

2600 INK 9,0: INK 10,0:PEN 5:LOC 

ATE 1,1 {P£> 

2610 PRINT STRING*(20,143);PEN 

2:CLS#I {AP} 

2620 it=3: GOSUB 3290 CCE> 

2630 !MOUNTAIN,b:FOR 1=0 TO 2:! 

SPRITE, ix(i,b-l> ,iytl,b-l),3:NE 

XTsBOSUB 3350 tCO? 

2640 ' MAIN PRDGRAM {EL} 

2650 x=36iy=191:ax=0:ay=0:s=ls2 

=0 *EM> 

2660 POKE *,A670,0;ON cal GOSUB 

2860,2800 CLF1 

2670 «l=xsyt=y:sl=s CBBJ 

2680 IF 1+INKEYC79JTHEN 3030 CCEJ 

2690 IF INKEYCDXOR INKEY(75)TH 

EN s=2:ax=a«+(l AND ax<6~flip) {DM} 

2700 IF INKEY<8>X0R INKEY(74)TH 

EN 5=liax=ax~U AND a«>flip-6) CJN1 

2710 IF INKEY(0)XOR INKEY(72)TH 

EN ay=ay+(l AND ay<6-f lip) :BOTO 

2730 C10J 

2720 ay=ay-(I AND ay>-6 AND zz 
MOD 3=0) CNG> 

2730 zz=> zz +i-if zz MOD 4=0 THEN 

ax=ax-SGN(ax) {FPJ 

2740 k=x +a« i y=y +ay s IF x<-2 THEN 

x=150+K ELSE IF «>150 THEN x=x 
-150 <MIJ 

2750 1CL, SPRITE, «1, yl, sl: tSPRIT 
E,«,y,B CCKJ 

2760 SOUND l,622-y*3,3,4tIF PEE 
K(StA670)THEN IF PEEK(«(A670) = 15 
THEN 3070 ELSE 2960 <DNJ 

2770 GOTO 2670 {BIJ 

2780 ' THE ROUTINES CJL5 

2790 'Inks Dn (color) tACJ 

2800 BORDER 13 fACJ 

2810 INK 0,0i INK 1,24: INK 2,0:1 

NK 3,6 CDEJ 

2B2B INK 4,26s INK 5,13iINK 8,tB 

:INK 9,2 <HNJ 

2830 INK 10,18,9: INK II, 6: INK 1 

2,24* INK 13, Zä tDKJ 

2B40 INK 14,20* INK 15,24 CACJ 

2850 RETURN {BP? 

2860 Inks an (green) {NI> 

2870 BORDER 13 tOH> 

2880 INK 0,0: INK 1,26: INK 2,0:1 

NK 3,1 {DO 

2B90 INK 5, 13* INK 8,lBsINK 9,24 

:INK 10,2,19 {OHJ 

2900 INK 10,2, 19: INK 1 1 , 11 : INK 

12,26; INK 13,24 CBPJ 

2910 INK 14,20t INK 15,26 {GG> 

2920 RETURN CABJ 

2930 Inks o-ff {JH> 

2940 BGRDER 0:FOR 1=0 TO 13l INK 

1 ,B: NEXT: RETURN {BD> 

2950 Crash {PO> 

2960 ;CL. SPRITE, x,y,s:PAPER 5:P 
EN 0: LOCATE 1 , 1: PRINT "BAD LUCK. 

TRY AGAIN; " {FM> 

2970 MOVE 0,94:DRAWR 638,0,5t MO 
VER 0,-2sDRAWR-63B,0 CGI} 

2980 ;FLUSH:SOUND 2,0,0,0,3,0,3 
:FOR >=y TO 16 STEP-2 ippy 

2990 !SHflPE,«,I ,0s SOUND 1,622-1 
♦3,2,4: !CL.SHflPE,x,l:NEXT {GB> 
3000 iHLT,4tIiv=liv-l {GHJ 



42 



Computronic 






3010 IF liv THEN GOSUB 3270s INK 

2,13:GDT0 2600 
3020 'End of gante 

3030 PEN 1: LOCATE 16,22: PRINT n 
ull*<5) j 

3048 scr=sc+BbDn:BOSUB 3158: !HLT 
,5: IF -sc<=s(10)THEN 21BB 
3050 CJDSUB 2940s MODE 1 1 GDSUB 34 
40: GOTO 2180 
3860 'Got item 

3070 SOUND 2, 61, 0,0,4: SOUND 2,0 
t 100,0iFOR 1=0 TD 2 
3080 IF ABS < ix U,b-l)-x><8 THEN 
(CL. SPRITE, ix (1 ,b-l) ,iy(l ,b-l) , 
3: S SPRITE, x,y, 5 

3090 NEXT:it=it-lssc="«c+b*lev*l 
i v»15B 
3100 POKE l<A67B,0: GOSUB 31501 IF 

it THEN GDSUB 3288: ay^flip: GOT 
2670 

3110 sbon=sbon+b*lev*liv*75sG05 
ÜB 3310 

3120 GOSUB 426Bt !HLT,6: ICL.SPRI 
TE , x , y , s 

3130 IF b=10 THEN 3030 ELSE 259 


3140 'Set «score 
3150 IF sc=0 THEN RETURN 
3160 le=INT<LOBlB<sc>)+t:PEN 1: 
LOCATE 1,22 

3170 PRINT USlNG , '#tt#### , 'i5c: : LD 
GATE 1,22 

3180 PRINT null*(6-le>; -.RETURN 
3190 'Set highscorB 
3200 le=INT(LOG10(sch) )+l:PEN 1 
: LOCATE 1,25 

3210 PRINT USING"#*####"jsch; iL 
GCATE 1,23 

3220 PRINT nuU*<6-le):: RETURN 
3230 *S«st level 

3240 le-INT<LOG10(b> )+l:PEN isL 
GCATE 13-le,22 
3250 PRINT bj: LOCATE 9,22;PRINT 

null* (5-1 e> ; : RETURN 
3260 "Set Uvea 

3270 PEN 1s LOCATE 20, 22t PRINT U 
SING"#";livs.:RETURN 
32B0 'Set item 

3290 PEN I: LOCATE 13, 25«. PRINT U 
5ING"#":it:»RETURN 
3300 'Set bonu» 

3310 le=INT<L0G18<5bon))+liPEN 
1: LOCATE 20-1 e, 25 

3320 PRINT STRt(5bDn) ; : LOCATE 1 
S,25 

3330 PRINT nulI*(6-lB) 3 : RETURN 
3340 'Place screert-title 
3350 PEN 5: LOCATE 1,1: PRINT STR 
INB*(20,143) ; 

3360 lB=LEN(com*(b-l) ) : LOCATE 1 
l-.le\2,i 
3370 PAPER 5: PEN 2s PRINT com*(b 

-i); 

3300 IF le/201e\2 THENiLTURN,l 
, 1 

3390 i READ Y: RETURN 
3400 'De+ine window 
3410 MODE 0: PAPER 8s CL5; PAPER 5 
: LOCATE 1,20 SPRINT CHR*<20> 
3420 PEN 5: LOCATE 1,1: PRINT STR 
ING*(20, 143> sWINDOWttl , 1 ,20,2, 19 
i RETURN 

3430 'Tnpten (put in) 
3440 PAPER BsCLSj '.BUFFER: neu=l; 

B(1B)=EC 

3450 nam* (10) =" " : day* < 10) = " " :PE 

N 3 

3460 LOCATE 16,6: PRINT"EXCELLEN 

T! " 

3470 LOCATE 8,8: PR INT" YOU ' VE RE 

ACHED THE TOP TEN" 

34B0 LOCATE 8, 9: PRINT 5TRING*<2 

6,45) 



CPI> 
CDN> 

CEA> 

<FE> 

CAK> 
CPFJ 

CKP> 

tDLJ 

{MC} 

tHCJ 

IDH> 
CLB> 
<ON> 

CNLJ 

<BK> 
CCM} 
ILM> 

{IL? 

fCI> 
tPNJ 
CNL3 

CEGJ 

{MO} 
tNJ} 

tPB> 
<0PJ 

CFD3 
CK65 

CHD3 

tLBJ 
{EP3 

CFO} 

{LE} 

CAH> 

<EB} 

CLJ} 
ICK3 
tMS> 

{AM} 



COM} 

CB3J 

CNFJ 
CCE3 
IDA} 
IGBJ 
IBFJ 



3490 PEN 1: LOCATE 16,12 

3500 PRINT'-ENTER NAME": PEN 2:LQ 

GATE 14,15 

3518 PRINT STRING*t 14,45) : INK 2 

,15-(cd1-1)*13 

31520 INK 1,26: INK 3 ,6: »1 = 14: a2= 

14:a3=13sk=0 

3530 GDSUB 3590: FDR 1=0 TO a3sn 

am* (10) =nam* (10) +CHR* Cc ( 1 > > s c U 

> =32: NEXT 

3540 PEN 1: LOCATE 11 , 17«PR1NT"E 

NTER DAY OF GCORING" 

3550 PEN 2:L0CATE 16,2»:PRINT"- 



3560 aI=16ia2=19:a3=9:k"B:G0SUB 

3590 
3570 FOR 1=0 TO 10: day*< 10) =day 
*U0>+CHR*{c (1) ) :c(l>=32:NEXT:S 
OTO 3630 

35 SB ' Input subrautine 
3390 WHILE, in*<="" s in*=INKEY*j WE 
ND:in=ASC(in*> 

3600 IF in*=CHR*<13)THEN in*="" 
: RETURN 

3610 IF in*=CHR*( 127) THEN k=k-t 
1 AND k>0): LOCATE al+k ,a2: PRINT 
" ":c(fc)=32 

3620 IF in<32 OR in>90 THEN In* 
="":GOTO 3590 

3630 LOCATE al+k,a2:IF k<=a3 TH 
EN PRINT CHR*(in>ELSE PRINT" " 
3640 c(k)=in:k=k+(l AND k<=a3) : 
in*=" ":GOTO 3590 
3650 'Tüpten (sort) 
3660 FOR f=2 TO 10: FOR i=18 TD 
f STEP-1 

3670 IF s(i-l)>=>sti»THEN 3710 
36B0 sl=s<i) is(i)=s(l-l)-.5<i-l) 
=sl 

3690 jf=nam$(i ) :nam* ii )=nam*<i- 
l):nam*U-l)=i* 

3700 j*=d»y*(i) : day*<i ) =day*Ci- 
1) :day*<i~l)=j* 
3710 NEXT i,f 
3720 'Topten (print) 
3730 GDSUB 2940: MODE 1:PEN 3:L0 
CATE 13,1 

3748 PRINT "THE HALL OF FAME";iB 
IG, 13,1,16 

3750 PEN 2: LOCATE 2, 3; PRINT STR 
I NG* < 3S , 45 ) 

3760 FOR 1=1 TO 10: LOCATE 2,2+1 
*2 

3770 PRINT nam*<l) : LOCATE 30,2+ 
1*2; PRINT day*(ü 

3790 PEN IsLOCATE 18,2+1 *2: PRIN 
T USING"#**#tt##":5<l> 
3790 IF s(l)<100000 THEN LOCATE 

1B,2+1*2:PRINT"0"; 
3800 PEN 22 NEXT: LOCATE 2,23-PRI 
NT STRING*(3B,45S 

3B10 PEN 3:LOCATE B ,24; PRINT"PR 
ESS ANY KEY TO CONTINUEj "s i BIG, 
S,24,2B 

3B20 INK 1,26: INK 2 , 15- (col -1 ) * 
13 

3B30 INK 3,6: 1BUFFER: IKEY, IN:CL 
S: RETURN 
3840 "Demo 

3B50 quiet=0:b=RND*9+ls GOSUB 29 
40 

3B60 GOSUB 3410: !MOUNTAIN T b: !SP 
RITE, 0,183,4s ! SPRITE, 128, 167,5: 
GOSUB 3350 

3B70 PEN 4:LDCATE 1,20s PRINT ST 
RING*<20,154> 

3BB0 LOCATE 1,25s PRINT STRING*< 
20,154); 

3890 PEN 3: LOCATE 1 ,21: PRINT "SU 
PRA-SOFT" 

3900 LOCATE 1 , 23: PRINT"TDRO-GAM 
ES" 
3910 PEN 1: LOCATE 13,21 : PRINT"T 



CCGJ 
tHL» 
<!GFJ 
tJEJ 

<AEJ 
tKP> 
fID> 
CHGJ 

fDD> 
tBF> 

fDEJ 

ijpy 

CGEJ 
{IB> 

CHK3 

<FH> 
CPK3 

<LG3 
tBF5 

(KDJ 

tCL5 
tIM> 
tMO> 

CAOJ 

tBO> 

tLI> 

CDJJ 
tBI> 
tCKJ 
IPCJ 
tLGJ 

ÜNB5 
tCH3 

mpy 

CDDJ 
CKF3 

tGOJ 
CDE3 
CCN> 
<LA> 
tGDJ 



HE DEMO" tOPJ 

3920 LOCATE 13 , 22: PRINT" THE DEM 
O" tOE> 

3930 iBIG, 13, 22,8» (BIG, 1,23, 20 IML> 
3948 iBIG, 1,21, 20: IBIG, 13, 21, Si 
! READY tDL> 

3950 ON col GOSUB 2B60,2B00 <NC> 
3960 RESTORE 4040s EVERY 5,0 GOS 
ÜB 4000 <H0> 

3970 DN SQ(1)GDSUB 4020: IF quie 
t=0 THEN FOR m=l TO 45: NEXT: GOT 
O 3970 IGNJ 

3980 FOR 1=1 TD 1758: NEXT: r=REM 
AIN(0) : iFLUSHsGOTO 2188 <CA> 

3990 'Move aliens tBE> 

4000 !LTURN,3: (RTURN,5bRETURN tDDJ 
4010 'Music tCL> 

4020 IF quif"t THEN RETURN ELBE 
READ a,c:IF c—1 THEN quiet-=l <CK> 
4030 SOUND l,a,c*l,12,l,l:RETUR 
N <MKJ 

4040 DATA 142,20,142,10,0,4,142 
,181 tAH> 

4050 DATA 0,4,142,20,0,4,142,10 
,0,4 tMOJ 

4060 DATA 142,20,213,20,179,20, 
142,20 CEKJ 

4070 DATA 159,20,0,4,159,18,0,4 
,159,10 OHO 

4080 DATA 0,4,159,20,0,4,159,10 
,0,4 <GJ> 

4090 DATA 159,10,0,4,159,20,0,4 
,239,20 {LIJ 

4100 DATA 190,20,159,20,142,20, 
0,4 tFH> 

4110 DATA 142,10,0,4,142,10,0,4 
,142,20 CEH> 

4120 DATA 0,4,142,10,0,4,142,10 
,0,5 tCI> 

4130 DATA 142,20,127,20,119,20, 
106,20 * CECJ 

4140 DATA 119,20,142,20,159,20, 
190,20 tPLJ 

4150 DATA 213,40,0,8,213,40,0,4 
,142,40 tCHJ 

4160 DATA 0,4,142,20,0,4,142,10 
,0,4 CEE! 

4170 DATA 142,28,213,20,179,20, 
142,20 tEA> 

4180 DATA 159,40,8,4,159,20,0,4 
,159,10 tHF} 

4190 DATA 0,4,159,20,239,20,179 
, 28 IDGJ 

4280 DATA 159,20,142,40,8,4,142 
,20 {DPI 

4210 DATA 142,10,0,4,142,10,8,4 CIN} 
4220 DATA 142,20,127,20,119,28, 
106,20 CEC} 

4230 DATA 119,28,142,20,159,20, 
190,20 CPL1 

4240 DATA 213,40,0,4,213,40,0,- 
1 tGDJ 

4250 'Winner sound CJS} 

4260 RESTORE 4280 CND> 

4270 READ a,c: IF c=-l THEN RETU 
RN ELBE SOUND 2,a,c*0. 5, 12, 1 , 1 i 
GOTO 4270 CAN1 

42S0 DATA 426,40,319,50,426,20, 
319,40 CKC} 

4290 DATA 253,20,0,5,253,20,0,5 
,319,80 CJA> 

4308 DATA 426,40,0,-1 CEC5 

4310 'Instructions CDAJ 

4320 GOSUB 2948: MDDE 1:PEN I : LO 
CATE 13,1 CFO} 

4330 PRINT" INSTRUCTIONS (1)":!B 
IG, 13, 1,16 CDN> 

4348. PEN 2ü PRINT: PRINT: PRINT ■ CGG} 
4358 PRINT" DER HEUTIGE SOFT« AR 
. E- MARKT IST UEBER-" CIG> 

4360 PRINT" SCHWEMMT MIT SCHLEC 
HTEN PROGRAMMEN. " CJM} 

4370 PRINT" DAS MUSS NICHT SEIN 
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■ >ORDIT CHICANE<" {KB> 

43B0 PRINT" BEWEIST DAS GEGENTE 
IL: EIN SPIEL, DOS" {JEJ 

4390 PRINT" KLASSE HAT!" <EPJ 

4400 PEN 3: PRINT {HU 

4410 PRINT" LASSEN SIE SICH FES 
5ELN VON MITRE1SSEN-" ; {AH} 

4420 PRINT" DEN SPRITES, AUSGEK 
LUEGELTER SRAPHIK" tDK> 

4430 PRINT" UND Z80-POWFRSGUND. 

DREI FAKTOREN, EINE"; {KD} 

444B PRINT" GARANTIE: ORBIT CHI 
CANE HAELT, WAS DER" {MH1 

4450 PRINT" NAME VERSPRICHT!" CELJ 
4460 PEN 2; PRINT {FBI 

4470 PRINT" MULTI-SCREEN TECHNI 
K MIT ZEHN TOLLEN" {OK} 

44B0 PRINT" GEBIRGSZUEGEN ERWAR 
TET SIE, WQBEI JE-" tMNJ 

4490 PRINT" DESMAL DREI ITEMS E 
INZUSAMMELN SIND." <HLJ 

4500 PRINT" SO LEICHT ES KLINGT 
, SO SCHWER IST ES. " tDC? 

4510 PEN 1; LOCATE 14,23: PRINT"< 
<< TASTE; >»" fKKJ 

4520 JBIG, 14,23, 14: INK 1 ,6: INK 
2,26 {JDJ 

4530 INK 3, 15-<col-l)*13: ! BUFFE 
R: [KEY. IN CJ1J 

4540 GOSUB 2740; MODE 1 1 PEN 1 ; LO 
GATE 13,1 tFOJ 

4550 PRINT" INSTRUCTIONS (2)":!B 
IG, 13, 1,16 tDCJ 

4560 PEN 2-, PRINT: PRINT: PRINT WGJ 
4578 PRINT" PRO EINGESAMMELTEM 
ITEM BEKOMMEN SIE" {KAJ 

4SS0 PRINT" PUNKTE, DEREN ANZAH 
L SICH NACH SCREEN-" {BDI 

4590 PRINT" INDEX, RESTLEBEN SO 
WIE DEM VORHER IM" {LL> 

4600 PRINT" MENUE SELEKTIERTEN 
SKILL-LEVEL RICHTET."; £KJ> 

4610 PEN 3: PRINT {EL} 

4620 PRINT" NACH ERFOLGREICHER 
BEENDIGUNG IHRER" {CH3 

4630 PRINT" GEFAHRVOLLEN MISSIO 
N KOENNEN SIE SICH" iLLl 

4640 PRINT" BEI ENTSPRECHENDER 
PUNKTEZAHL SELBST-* 1 C031 

4 £,50 PRINT" VERSTAENDLICH IN DI 
E TORTEN EINREIHEN." {MC} 

4660 PEN 2: PRINT {ED} 

4670 PRINT" DIES IST AUCH DER F 
ALL, WENN SIE DAS" {HM} 

46S3 PRINT" SPIEL VORZEITIG DUR 
CH >DEL< ABBRECHEN. " tEAJ 

4690 PRINT" SIND SIE DAGEBEN MU 
TIS GENUG, ERHAL-" {BM} 

4700 PRINT" TEN SIE NACH JEDER 
RUNDE EINEN BONUS!" {DJ} 

4710 PEN 3: PRINT {BMJ 

4720 PRINT" VIEL GLUECK 

WUENSCHEN: " {EBJ 

4730 PRINT" THOMAS ROTTHOFF - 
- ALEXANDER STROH" <AA} 

4740 PEN 1:LPCATE 14 ,24: PRINT"< 
<< TASTE; >>>" {FM} 

4750 !BIB, 14*24, 14: INK 1,6: INK 
2,26 iJNJ 

4760 INK 3,i5-(coI-l)*13: t BUFFE 
R: !KEY.IN:GOTQ 2180 {II} 

ENDE DES LISTINGS 



W++ Tfeil2 ♦♦♦ 



SCHNEIDER LISTING MIT CHECKSUMMEN 
V 2.0 



1000 ' 

1010 • ORBIT CHICANE 

1020 ' THE DAT AS 



CEF} 

(GA} 
<JM5 



1030 ' — (c) Juni *87 by — 

1040 ' 

' — Thomas Rotthoff — 

' und 

' — Alexander Stroh — 



1050 

1060 
1070 

10B0 ' 

1090 MODE 1:CALL &BC02: DEFINT a 



1100 INK 1,26: PAPER 0: PEN 3:CLS 

1110 DIM s(10) ,na<n*C!0} ,day*C10 

) 

1120 FÜR 1=1 TO 10 

1130 s(l) =10000 

1140 day*U >="0i.0I. 1987" 

1150 IF 1 MQD 2 THEN 1 1S0 

1160 nam*<l >="TOROH3AMES" 

1170 GOTG 1190 

1180 nam*<l)="SUPRA-SaFT" 

1190 NEXT;PRINT CHR*(7) 

1200 LOCATE 12,12:PRINT"READING 

LINE" 
1210 PEN ljFOR 1=0 TO &ES5: READ 

a* 
1220 POKE &9000+l,VAL<:"& ,, +a*) 
1230 IF 1 MOD ZUOB THEN 1250 
1240 LOCATE 25, 12: PRINT 2000+1* 
10/28 

1250 NEXT; PRINT CHR*<7):PEN 3: L 
OCATE 12,14 

1260 PRINT"SAVING "+CHR*<34>; 
1270 PEN l:PRINT"OCODE.BIN"i 
12S0 PEN 3: PRINT CHR$(34) 
1 290 SA VE "ocoda" , b , &9B00 , &ES6 
1300 GPENOUT"octap.-FU":FaR 1 = 1 

TO 10 
1310 PRINT#9,sU) 
1320 PRINT#9,nam*<l) 
1330 PRINT#9,day*(l > 
1340 NEXT:CLOSEOUT 
1350 FOR 1=1 TO 3000: NEXT: PRINT 

CHR*<7) 
1363 MDDE 1 t PEN 1 J CALL &BC02 s EN 
D 

1997 ' 

1998 '- Part li SCREENS - 

1999 ■ 

2000 DATA 2C,2E,30,32,34,36,3A, 
3E,42,46,4A,4E,52,58,5E,64,6C,7 
4,7C,76 

2010 DATA 70,6B,6A,72 t 7C,BB,96, 

AB * AE , B2 , A2 , 94 , B6 , 70 , 64 , 5E , 60 , 6 

0,5B,48 

2020 DATA 3B,2B,1A,I4, 1E,0E,0C, 

0C,0C,0C,0C,0C,0C,8C,0C,0E, 12,1 

4,IB,1E 

2030 DATA 26,2A,24,1E,1A,1C,2G, 

3E , 5E , 6C , 7A , 94 , AE , C2 , C6 , CS , C4 , C 

0,BA,BC 

2040 DATA BE,C4 ,CA,DA ,CE,C0, AB , 

92,82,70,5A,44,3C,3A,36,36,3A,3 

6,36,36 

2050 DATA 36,36,36,3E,4A,4C,60, 

66,96,98,9C,A0,A4,AS,A6,A0,98,a 

0,68,48 

2060 DATA 28,22,20,20,20,20,20, 

20,20,20,4A,66,6B,6A,7S,94,BC,C 

7,CD,D5 

2070 DATA D5,D1 ,CD,B5,Aft,8C, 78, 

68 t 5C ,52,4A, 44 , 40 , 3C ,3A , 3B, 36,3 

4,32,30 

20B0 DATA B6,B4,5C,46,54,56,50, 

3C,2A,lC,lE,lE,lE,lA,i6,l0,12,l 

6,22, 2E 

2090 DATA 44, 5E, 74, 84, 76, 62,56, 

50,50,50,50,50,50,50,50,50,52,5 

4 , 56 , 82 

2180 DATA A6,C2,D6,B6,S4,5C,30, 

IE, 1A, 16, 16, 16, 16, 16, 16, 16, 16,1 

6,18 t lC 

2110 DATA 2A,3A,6Aj78,7E,aB,7E, 

7A,74,6E,60,4A,40,3A,34,34,34,3 

4,36,3A 

2120 DATA 3C,3C,3E,40,44,42,3E, 



{GK} 
{OJ} 
CAD} 
{DH> 
{ND} 
{MN> 

{DU 
{JDJ 

{PL} 
£DF> 
{JNJ 
{HE} 
{JO> 
{AB> 
tNDJ 
{EP> 
{FE} 

CFH> 

{DG} 
{IL} 
{HD} 

{GO} 

tQL> 
{HE> 
{NA> 
{LC> 
{KGJ 

{CG} 
{EL} 
{CJ} 

{CI> 
{BJ} 

{PF} 

{FF} 
{BG} 
{MB} 
<AA} 



{MG} 
{DP> 
{NC} 
{BG} 
{DE} 
{IP} 
{JG} 
{JF} 
{MI} 
{HH> 
{DD} 
{PIJ 



3C,34,2A,24,20,1C,18,14,16,1A,1 
E,34,4E {HDJ 

2130 DATA 74,A2,C0,BC,BS,9B,7A, 
5E,62,64,66,6A,70,7e,a0,BA,96,A 
A,AC,AB CAC5 

2140 DATA 9E,90,78,54,36,26,IA, 
12, 14 , 14, 1B, IE, 24, 34, 46, SE, SA, S 
4,52,52 {CG} 

2150 DATA 52,52,52,52,52,52,52, 
52,58,5A,5C,64,76,90,A6 T B6,CC,D 
A,D6,D0 {EC1 

2160 DATA CB,C6,C4,BE,B0,9C,8E, 
BA,B6,84,B4,84,e4,B4,84,84,B4,a 
4,B6,92 {LH3 

2170 DATA 9C,B0,BB,BC,BC,B6,9E, 
80,6A,5E 52,42,30,2A,28,2A,30,3 
2,34,36 {HÖJ 

21B0 DATA 3A,3E,46,58,64,50,3E, 
7B,76,82,92,9A,8B,72,60,4A,3C,3 
E,40,3E {FN5 

2190 DATA 3A,36,3B,3C,3E,40,42, 
3E S 3A,36,32,34,3B,46 T 54,66,7B,7 
A,74,68 {LI} 

2200 DATA 56, 54, 58, 5C, 64,74,88, 
A4,B6,C2,C8,CA,CC,CC,C8,C0,B2,A 
0,90,72 iHNJ 

2210 DATA 58,38,24, 16, 0E,0A,0A, 
0A,0A,0A,0A,0A,0A,0A, 10,14,28,3 
B,34,B0 {AR} 

2220 DATA 90,AE,AA,A4,8C,6A,42, 
32 , 2A 1 28 , 28 , 28 , 2A , 34 , 42 , 5E , 62 , 5 
2,42, 3C {EF> 

2230 DATA 3C,3C,3C,3C,3C,3C,3C, 
3C,3E,42,48,50,5C,72,8C,B0,C0,C 
0,BC,A4 <MBJ 

2240 DATA 3A.3C , 3E, 40,42 , 44, 46, 
48,4A,4C,50,54,5B,5C,60,64,6A,7 
0,76,7E {MP> 

2250 DATA S8,96,B0,C4,B6,9C,8C, 
B8,B4,84,B4,B2,7C,72,44,iE,lC,2 
E,54,56 " {EN> 

2260 DATA 56 ,5B ,5B,5A ,5C ,6A,6B, 
62,58,54,54,54,54,54,54,54,54,5 
4,4C,40 CDI} ' 

2270 DATA 30,2A,2C,32,42,54,70, 
90,B2,D2,D0,CE,D0,D2,D4,CE,C4,B 
A,B6,BS {AFI 

22B0 DATA C4 ,D0 ,D2,D2,CE , BA,B4 , 
A2, 72, 62, 56, 50, 4C, 48, 48, 48, 48, 4 
8,48,48 {HCJ 

2290 DATA 48 ,48,4C,60,BE, A4,BC, 
CC , CE , CE , CC , BC , A4 , BE , 60 , 4C , 49 , 4 
4,4B,3A {NMJ 

2300 DATA 23,1A,0E,0A,0C,0E,0E, 
0E,0E,0E,0E,0E,0E,10,20,3C,50,6 
6,62,64 {DP> 

2310 DATA 50,3C,20,10,0E,0E,14, 
2A,48,6E,BB,A6,B0,BB,BE,C2,C4,C 
6,C8,CA CGCJ 

2320 DATA 16,16,16,18,18,18,18, 
1A,1A,1E,1E,1A,1A,1C,1C,1C,1E,2 
2,22,26 {IP3 

2330 DATA 2A ,24, IC, 10,0A,0A,0A, 
0A,0A,0A,0A,0A,0A,24,68,94,9E,A 
0,A0,9C {NH3 

2340 DATA 9C ,9C,9E,A4 , AC ,CA,D6, 
D4,CE,CA,CC,CC,CC,CC,CE,D0,D2,D 
2,D2,D2 {NH> 

2350 DATA D4 ,D2, D2 ,D2 ,C8 ,C0, B0, 
9B,B6,BB,BC,BE,8A,7B,4C,34,30,3 
0,30,30 <PK3 

2360 DATA 30, 30, 30, 30, 30, 90, B0, 
CB,D4,D4,D4,CC,C6,BE,B6,AE,B4,B 
A,BA,B4 {DN} 

2370 DATA A6,S4 , 6A t 42, IE , 14, 14, 
16,1A,24,32,40,3A,30,22,1B,12,0 
C,0C,0C £CFI 

23S0 DATA 0E T 12,14,1E,2E,4A,6B, 
8B,B8,aA,BC,e4,78,5C,54,54,34,5 
4,54,54* ■ {FKJ 

2390 DATA 54 ,54,56,5A,54 ,4C,3A, 
3C,44,56,6a,B6,9C,9E,A0,A2,9E,7 
4,5A,36 <LJ> 
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2400 DATA 0C,0C,0E,0E, 10,10, 10, 
12, 14, 14, 16, 18, 1A, IC, 20, 24, 26,1 
E,1B,0A tHP> 

2410 DATA 06,06,06,06,06,06,06, 
06,06,0B,14,24,4E,74,94,A8,B2,B 
6,B8,B2 tFJJ 

2420 DATA A0,BS,6B,52,46,3C,36, 
32,3B,3E,46,40,3C,3B,36,34,36,3 
B,40,4B *AL> 

2430 DATA 50, 5A, 60, 04 ,A0,BE,D4, 
D2,CE,CA,C0,AC,A4,A2,A0,A0,A0,A 
0,A0,A0 (FC> 

2440 DATA A0,A0,A0,A4,AA,B2,C6, 
CE,CA,C4,C0,BE,BC,C0,C4,C6,B6,A 
0,84,58 (ED* 

2450 DATA 2B, 16, 0C, 06,06, 0B.0E, 
14,28,3A,52,4C,44,30,24,1A,14,1 
0,10,10 ILD> 

2460 DATA 12, 14, 1B, IC, 22, 30, 56, 
6A,7£,94,AC,C4,AA,9B,6A,62,62,6 
2,62,62 tOH> 

2470 DATA 62, 62, 62, 64, 74, 90, AE, 
B6,BC,BE,BE,BC,B4,AA,94,8C,84,B 
B,8E,B0 «NH} 

24B0 DATA 72,6C,64,5A,4C,4B,46, 
46,46,48,4A,4E,54,5E,6B,BC,AA,B 
2,B6,B8 <CE> 

2490 »ATA B4,AE,A6,90,64,56,50, 
4C,4B,4B,4B f 4B,48,4B,4B,4B,4A,4 
E,5C,6A {01} 

2500 DATA 6E, 66, 4E, 32, 22,12,08, 
0B,08,0A,0C,8C,0C,0E,0E,0E,10,1 
0,10,12 COB> 

2510 DATA 12,14,16,1A,1E,22,2A, 
32,3C,4C,76,A0,A4,A0,96,BB,78,7 
S,7A,BE {EB7 

2520 DATA C6,CC,D4,D6,D6,D6,D6, 
D6,D2,C6,B2,A6,A0,A0,A0,A0,A0,A 
0,A0,A0 <LPJ 

2530 DATA A0,AA,B2,C2,CE,D0,D0, 
CC,BE,AC,8C,6C,36,52,4E,50,52,5 
6,5E,70 <AB> 

2540 DATA 84, B0, 72, 58,40,20, 12, 
0C, 08, 08, 08, 06, 04, 04, 04, 06, 06,0 
8,10,18 «3D> 

2550 DATA 30,4A,4C,40,2A, 14,08, 
04,04,04,04,04,04,04,04,04,08,1 
A,48,86 {KK> 

2560 DATA A6,C2,CC,D0,D0,D2,D2, 
D0,D0,C8,B0,AC,AC,AC,AC,AC,AC,A 
C,AC,AC CNPJ 

2570 DATA BB,CE,D0,C4,90,72,5B, 
46, 42, 42, 42, 42, 42, 42, 42, 42, 42, A 
A,AC,AE {BB> 

25B0 DATA BA,C6,D0,D2,D2,D2,D0, 
8B,9C,94,90,8C,BB,S4,82,B0,80,B 
0,B2,86 {ED> 

2590 DATA 8C,92,BE,82,6E,50,34, 
24,12,12,5A,74,76,6E,36,4E,6A,9 
6,AC,BE CGB> 

2600 DATA 02,CC,B6,9A,82,6E,3B, 
20,10,16, 14, 14,16, 1B, 26, 4A,7B,B 
E,BC,B6 CCK> 

2610 DATA 96,6E,46,42,44,5A,B6, 
OB, 80, 72, 70, 70, 70, 70, 70, 70, 70, 7 
0,70,A6 (1HI 

2620 DATA CA,D4 ,D0,B2,8E,62,42, 
20,1C,16,16,1C,1C,16,10,0C,0C,1 
0,16,2B tKA> 

2630 DATA 40,5S,72,62,4E,4B,44, 
4B,4E,66,86,74,5A,4C,46,42,40,3 
E,3C,3B CFJ> 

2640 DATA 0A,0C, 14, 28,48, 5E.4C, 
3A,2A,1A,18,1B,20,2E,40,5B,64,6 
6 , 6B , 6A {MH> 

2650 DATA 6A,68 1 66,64,-60,4B,2E, 
24,26,2C,40,42,2A,iA,10,0E,0A,0 
6,06,06 €NF> 

2660 DATA 06,06,06,06,06,06,06, 
0B,lB,2B,3B,4C f 5E,60,5A,56,4E,4 
4,46,48 {GKJ 

2670 DATA 4C,52,5C,70,9A,B4,CB, 
CB,B6,9A,74,62,5C,5A,5A,5C,62,7 
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2,9C,B2 tNJ> 

26BB DATA C4,C6,C6 , C4,B4,90,6E t 
4C,36,1E,1C, IC, IC, IC, IC, IC, IC, 1 
C,1C,4C <ao> 

2690 DATA 68,88,72,56,3E,2E,20, 
24,30,26,10,06,04,04,04,04,04,0 
4,04,04 {CB> 

2700 DATA 04,0B,0A,0C,I0,16,1E, 
24, 32, 30, 2fl, 22, 16, 0fi, 06, 06,08,0 
C,12,1E (KD> 

2710 DATA 30,5C,7A,BE,96,A8,AA, 
B0,BB,C0,CB,D0,D0,D2,D2,D2,D4,D 
0,CC,BE fPG> 

2720 DATA 5E,4E,3E,34,34,34,34, 
34, 34, 34, 34, 34, 36, 3B, 46, 54, 5A, 8 
0,AA,D2 (FP> 

2730 DATA D6,D6,D6,D6,D6,D2,D0, 
CC,C4,AE,94,7E,6E,62,58,52,50,5 
0.50.4E {AA> 

2740 DATA 48,3C,32,2C,2C,2C,30, 
40,5E,7E,8E',90,90,90,90,90,90,B 
C t 88,7C {DF> 

2750 DATA 52,3A,22, 10,0E,0E, 1A, 
34,4A,5S,6C,7C,86,8E,92,94,94,9 
4,94,94 <HE> 

2760 DATA 94,94,94,94,94,96,98, 
9C,A2,A8,BA,D0,D6,C6,AC,92,74,4 
E,3B,26 {CB> 

2770 DATA 14, 14, 14, i4, 14, 14,14, - 
14,14,26,52,C0,D4,D0,AE,AA,A6,A 
8,BA,DB COFJ 

2780 DATA CE,AB,90,72,5B,4C,42, 
3C,3A,3A,3A,3C,3E,42,52,74,92,A 
6,A8,A8 (FPJ 

2790 DATA A6,92,7B,64,54,4A,3C, 
36,32,2E,2A,2A,26,26,26,24,24,2 
4 24 22 {PJJ 

2B00 DATA 2E,46,5E,5B,7A,50,1B, 
68,31 ,4B,8A,69,09,B2,69,45,8B,5 
E,31,6A CLNJ 

2810 DATA SD, 64, 70,47, 18, 45, 4C, 
5B,B6,6A, 14,43,4A,90,B7,71,1C,6 
4.5C.90 (C0> 

2820 DATA 93, 42, OB, 96, IC, 61 ,6E, 
78,26,43,5A,4E,70,42,03,5A,4B,B 
A,64,4A {KB> 

2827 * INH> 

282B *- Part 2t SPRITES - fGO> 

2829 * {JJ> 

2830 DATA 33,88,4B,BA,F0,F0,F0, 
F0,F0,F0,F0,F0,F0,F0,F0,F0,F0,F 
0,FB,F0 tHL> 
2840 DATA D8,F0,CC , CC,DB,F0,F0, 
F0,DB,F0,F0,D8,F0,F0,F0,F0,DB,F 
0,F0,DB tAB> 
2S50 DATA F0,F0,F0,F0,DB,F0,F0, 
DB,F0,FO,CC,CC,DB,F0,F0,DB,F0,F 
0,F0,F0 «CK» 
2860 DATA D8,F0,F0,D8,F0,F0,F0, 
F0,D8,F0,CC,CC,DB,F0,F0,F0,F0,F 
0,F0,F0 (AH> 
2870 DATA F0,F0,F0,F0,D0,F0,C0, 
C0,D0,F0,C0,C0,D0,F0,F0,F0,D0,F 
0,F0,F0 {JOJ 
2880 DATA D0,F0,F0,F0,D0,F0,F0, 

F0, 03,^0,00,00,00^0,00,00,00^ 
0,D0,F0 <LP> 

2B90 DATA F0,F0,D0,F0,D0,F0,D0, 
F0,F0,F0,D0,F0,00,00,00,00,00,0 
0,00,00 {FM1 

2700 DATA 00,00,00,00,00,00,«0, 
00,45,CF,CF,CF,BA,00,00,00,00,A 
2,00,00 tGA> 

2710 DATA 00, 00,00,00, 00, 9B,9B, 
67, CF, 00, 00, 00, 00, A2, 00, 00,00,0 
0,00,00 <+IM> 

2920 DATA 45,CF,67,CF,BA,00,00, 
00, 00, A2, 00, 00, 00 ,00, 00, 00, 00,0 
0,22,00 «m 

2930 DATA 00, 00, 00, 00, 45, DB, 00, 
00,00,00,00,00,00,11,33,00,00,0 
0,00,00 <PK> 

2940 DATA 00, F3, 00, 00, 00,00,00, 



00, 00, 00, 33, 00, 00, 00, 00, 00, 45, D 
B,00,00 4AKJ 

2950 DATA 00,00,00,00,00,00,11, 
22, 00, 00,00, 00,00, F3,A2, 00, 00,0 
0,00,00 <FH> 

2960 DATA 00,00, 11 ,22, 00,00, F3, 
00, 00, F3,A2, 00,00, 00, 00, 00, 00,0 
0,00,33 CIP> 

2970 DATA 00,51 ,F3,A2, 00, F3.F3, 
00, 00, 00, 00, 00, 00, 00, 00, 11, 22, F 
3,33,F3 (8P3 

29B0 DATA 00,F3,F3, A2,55,AA,00, 
00,00,0F,00,5i,33,33,F3,73,5i,F 
3,F7,F3 CJH> 

2990 DATA 00,3F,00,00,00,03,0A, 
51,B3,F3,F3,73,F3,F3,FB,F3,A2,1 
5,2A,00 <FAJ 

3000 DATA 00,00,0F,F3,BB,FB,F3, 
73,7B,F7,F3,F3,A2,00,2A,00,00,0 
0,00,F3 tOJJ 

3010 DATA BB,FB,7B,73,F3,FB,F3 f 
B7,F3,F3,7B,A2,00,15,3F,7B,B3,F 
3,B7,F3 tADJ 

3020 DATA 7B,FF,FF,B7,3F,3F,3F, 
F3,00,15,3F,7B,B3,F3,B7,F3,7B,F 
3,F7,B7 tHCl 

3030 DATA 3F ,3F,3F,F3,00,00,0B, 
F3,BB,FB,7B,73,F3,F3,FB,B7,F3,F 
3,7B,A2 tAAJ 

3040 DATA 00,00,0F,F3,BB,FB,F3, 
73,7B,F7,F3,F3,A2,00,2A,00,00,0 
5,0A,51 <LC> 

3050 DATA B3,F3,F3,73,F3,FF,FB, 
F3,A2,15,2A,00,00,0F,00,51,33,3 
3,F3,73 tHF> 

3060 DATA 51,F7,F3,F3,00,3F,00, 
00, 00, 00, 00, 11, 22, F3, 33, F3, 00, F 
3,F3,A2 <FDJ 

3070 DATA 55, AA ,00,00,00,00,00, 
33,00,51 ,F3 t A2,00,F3,F3,00,00,0 
0,00,00 * U.LJ 

3080 DATA 00,00,11,22,00,00,F3, 
00, 00, F3.A2, 00, 00, 00, 00, 00, 00,0 
0,11,22 tKJ> 

3090 DATA 00,00,00,00,00,F3,A2, 
00,00,00,00,00,00,00,33,00,00,0 
0,00,00 tJJ> 

3100 DATA 45, DB, 00, 00, 00, 00, 00, 
00, 00, 11, 33, 00, 00, 00, 00, 00, 00, F 
3,00,00 CFP> 

3110 DATA 00,00,00,00,00,00,22, 
00, 00, 00 ,00, 00, 45, DB, 00, 00, 00,0 
0,00,00 {LJ> 

3120 DATA 45,CF,67,CF,BA,00,00, 
00, 00, A2, 00, 00, 00, 00, 00, 00, 00, 9 
B,9B,67 <PS> 

3130 DATA CF,00,00,00,00,A2,00, 
00,00,00,00,00,45,CF,CF,CF,8A,0 
0,00,00 tAH> 

3140 DATA 00,A2,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,0 
0,00,00 £JSJ 

3150 DATA 00, 00, 00, 00, 00, 00, 3F, 
CF,3F,0B,00,00,00,00,00,CF,00,0 
0,00,00 tFCJ 

316B DATA 00, 00, 00, CF, 00, 00, 00, 
00, 00, 00, 00, CF, 00, 00, 00, 00, 00,0 
0,00,CF CBO 

3170 DATA 00, 00, 00, 00, 00, 00, E7, 
FF t DB, 00, 00, 00, 00, 00, E7, FF, DB, 
0,00,00 CCGJ 

3180 DATA 00, 00, E7, FF, DB, 00, 00, 
00, 00, 00, E7, FF, DB, 00, 00, 00, 00,0 
0,E7,FF CBN> 

3190 DATA DB, 00,00, 00, 00,00, F3 f 
FF, F3, 00, 00, 00, 00,00, 00, CF, 00,0 
0,00,00 CMJJ 

3200 DATA 00,00,45,CF,8A,00,00, 
00, 00, 00, 45, CF,8A, 00, 00, 00, 00,0 
•0,45,CF CCGJ 

3210 DATA SA, 00, 00, 00, 00, 00, 00, 
CF, 00, 00, 00, 00, 00,00, 00, CF, 00,0 
0,00,00 CLK> 



Computronic 





3220 DATA 00, 00, 00, EF, SA, 88, 08, 
B0,00,08,00,EF,8A,08,00,BB,0B,0 

0,00, CF 

3230 DATA SA, 88, 80, 00,88,88,00, 

45, 00, 00, 00, 00, 00, 00, 00, CF, 22,0 

0,00,00 

3240 DATA 00, 00,00, CF, 98,00, 00, 

00, 00, 00, 00, DE, 9B, 22, 00, 00, 00,0 

0,00, DB 

3250 DATA 98,22,00,00,00,00,51, 

E7,7B,22,00,00,00,00,00,CF,9B,2 

2,00,00 

3260 DATA 00,00,00,BA,9B,22,00, 

00, 00, 00, 00, BA,BA, 08, 00,00, 00,0 

0,00, BA 

3270 DATA CF ,2A, 00,00,08,80,88, 

45, 45, 2A, 00, 00, 00, 00, 00, 3F, 00, 2 

A , 00 , 00 

3280 DATA 00 ,00, 00,45, BA, 00, 00, 

00, 00, 00, 00, CF,AA, 00, 00, 00 ,00,8 

0,00,CF 

3290 DATA AA, 00, 00, 00, 00, 00, 00, 

CF,BA, 00, 00, 00, 00, 00, 00, 45,0B,B 

0,00,00 

3300 DATA 00, 00, 00,47, SA, 00,80, 

0tB, 00, 00, 11, CF, SA, 00, 00,00,00,0 

, 33 , DB 

3310 DATA BA, 00, 00, 00, 00, 00, 33, 

DB,BA,00,00,00,08,00,33,CF,F3,0 

0,00,00 

3320 DATA 00 ,00,33, CF , SA, 00,00 , 

00, 00, 00, 33, BA, SA, 00, 00, 00, 00,0 

0,00, SA 

3330 DATA BA,00,00,00,00,00,6F, 

BA, SA, 00, 00, 00, 00, 00, 6F, 45, 00,0 

0,00,00 

3340 DATA B0,B0,2A, 15, 2A, 00, 00, 

00 , 00 , 00 , 00 , 00 , 00 , 0B , 00 , 00 , 00 , 

0,00,00 

3350 DATA 00,00,00,00,00,00,00, 

00,00,00,00,00,00,00,00,00,(90,0 

0,00,00 

3360 DATA 00,00,00,00,00,00,00, 

00,00,00,00,00,00,00,00,80,08,8 

0,00,00 

3370 DATA 00,00,00,00,00,00,00, 

00, 00, 00, 00, 00, 00, 00, 00, 00, 0B,B 

0,00,00 

33B0 DATA 00,00,00,00,00,00,00, 

00, 00, 0F, 00, 00, 00, 00,00,00,00,0 

F,00,0B 

3390 DATA B0,00,08,00,BF,0F,0F, 

00,00,00,0S,00,0F,0F,0F,00,00,0 

, 00 , 00 

3400 DATA BF, 0F, BF, 00,88,00,88, 

00, 00, 0F, 00, 00, 00, 00,00,00,00,0 

0,00,11 

3410 DATA 22, 00, 00, 08, 05, 0A, 11, 

33,33,22,85,BA,08,iB,33,9B,67,3 

3,27,00 

3420 DATA 05, 0A, 1 1 ,9B,67,22,Ö5, 

0A,80,0ß, 11 ,33,33,22,00,00,0F,0 

0,11,73 

3430 DATA BS, 22,00,0p, 05, 33, 33, 

B3, 73, 33, 33, 0A,0F, 00,80,33, 33,0 

0,00, BF 

3440 DATA 00,00,00,00,00,00,00, 



tPJ5 



{BIJ 



tFFJ 



{FNJ 



<HF> 



<CKJ 



{FM> 



<AD> 



tFHJ 



<NA> 



tBG) 



{DEJ 



<CPi 



tt_C> 



tBHJ 



CLE> 



{KFJ 



<NKJ 



<HA> 



<AH> 



<LK> 



{LJ> 



00,00,00,00,00,00,00,00,00,00,0 
0,00,00 <mq> 

3450 DATA 00,00,00,00,00,00,00, 
00,00,00,00,00,00,08,00,00,00,8 
0,00,00 {EDI 

3460 DATA 00,00,00,00,08,00,00, 
00,00,08,00,00,00,00,00,00,00,0 
0,00,88 {LA} 

3470 DATA 00,08,00,00,00,00,00, 
00, 00, 00, 80, 80, 00, CF.BA, 80, 00,4 
5,CF,00 tPH> 

3480 DATA 0F,9B,CF , A2 ,51 ,CF , 67 , 
0F,05,4F,67,9B,67,9B,8F,0A,00,4 
5,9B,CF {M0> 

3490 DATA CF, 67, 8A, 00,05, 4F,67, 
9B,67,9B,BF,0A,0F,9B,CF,A2,51 ,C 
F,67,0F {0J> 

3500 DATA 0B,CF,BA,00,08,45,CF t 
00,00,08,80,00,00,00,00,00,88,0 
0,08,00 CHJ> 

3510 DATA 00,00,00,00,00,00,08, 
00,08,00,00,00,00,00,00,80,00,0 

8,80,00 mm 

3520 DATA 08,80,80,00,00,08,00, 
00,00,00,00,00,80,00,00,00,00,0 

0,00,00 ' o_B> 

3527 ' CBLJ 

352B '- Part 3i COMMANDS - {IPJ 

3529 ' {HNJ 

3530 DATA 00,00,08,00,00,00,00, 
00 , 80 , 80 , 00 , 00 , 01 , 09 , 9C , 2i , SC , 9 
C,C3,D1 {DB} 
3540 DATA BC,38,9C,C3,90„9C,C3, 
D4,9C,C3,13,9D,C3,37,9D,C3,6E,9 
D,C3,B5 {HH> 
3550 DATA 9D,C3, A2, 9D,C3, C4 s 9D, 
C3,F7,9D,C3,2A,9E,C3,77,9E,C3,1 
B,BB,C3 {AD> 
3560 DATA 03, BB ,C3, 19, BD ,C3, A7, 
BC,4D,4F,55,4E,54,4i,49,CE,54,4 
F,D0,53 {B E> 
3570 DATA 50, 52, 49, 54, C5, 53, 48, 
41,50,C5,43,4C,2E,54,4F,D0,43,4 
C,2E,53 tcH} 
3580 DATA 50,52,49,54,C5,43,4C, 

2E, 53, 43,41 ,50,C5,4C,54,55,52,C 

E , 52 , 54 {BD> 

3598 DATA 53,52,CE,42,49,C7,4B, 

4C,D4,4B,45,59,2E,49,CE,42,55,4 

6,46,45 {LD j 

3600 DATA D2,52,45,41,44,D9,46, 
4C,55,53,CB,80,FC,A6,09,9C,3D,B 
7,Cß,7A {HB> 

3618 DATA B3,CS, 1B,EB,E5,06,87, 
29, 10, FD, Dl ,EB, 86, 85, 29, 18, FD, 1 
9,11,00 { NB j 

3620 DATA 98, 19, E5, DD, El ,86, AB, 
11 ,0B,88,C5,D5,21 ,60,BB,CD,GB,B 
B,3E,B9 {j B > 

3630 DATA CD, DE, BB, 1 1 ,00,08,62, 
DD,6E,00,CD,F9,BB,DD,23,D1,C1,1 
3,13,13 { DE j 

3640 DATA 13, 1B,DF,C9,FE,02,C8, 
EB,DD,56,03,DD,5E,82,CD,1D,BC,B 
E, 28,11 tQCJ 

3650 DATA 08, 97, E5, 06, 10, 1A,77, 
13, 23, 10, FA, El, CD, 26, BC, BD, 20, F 



0,C9,EB {j!G> 

3660 DATA 06,07 ,29, 18, FD , 1 1 ,00, 
99, 19, E5, DD, 6E, 82, DD, 66, 83, DD, 5 
E,04,DD UÜi 

3670 DATA 56,05,CD,1D,BC,D1 ,C9, 
FE,03,C0,CD,F7,9C,BE, 10, E5, 86,0 
B,1A,B7 tcpy 

3680 DATA 29, 09, 7E.B7 ,28,03,32, 
78,A6,1A,77,13,23,10,EF,E1,CD,2 
A,BC,8D CEB3 

3690 DATA 20 ,E5 ,C9,FE ,03,C0,CD, 
F7,9C,ES,DD,21 ,80, 96, 0E, 10,E5,0 
6,0B,7E {BOJ 

3708 DATA DD, 77, 00, 23, DD, 23, 10, 
F7,E1,CD,26,BC,0D,2B,ED,E1,8E,1 
0,E5,06 {GIJ 

3718 DATA 0B, 1A,B7,28,B1 ,77, 13, 
23, 10, F7, Ei, CD, 26, BC, BD, 20, ED, C 
9, FE, 02 {HJ> 

3720 DATA C0,EB,DD,56,83,DD,5E, 
B2,CD,1D,BC,06,2B,AF,77,CD,26,B 
C,10,F9 fOHJ 

3738 DATA C9,FE,83,C0,CD,F7,9C, 
BE, 10, E5, 06, 08, 1A,B7,28,02,AF,7 
A 13,23 {DO 

3748 DATA 10,F6,E1 ,CD,26,BC,0D, 
20,EC,C9,FE,02,EB,DD,5E,02,DD,5 
6, 03, CD {FJ> 

3750 DATA 1D,BC, 1 1 ,BB,96,0E, 10, 
E5,06,8B,1A,77,13,23,10,FA,E1,C 
D,26,BC {EOJ 

3760 DATA 0D,20,F0,C9,B7,CB,F5, 
DD,6E,8B,AF,2D,67,CD,1A,BC,E5,D 
1,23,86 cj M j 

3770 DATA 0B,E5,D5,C5, 1A,01 , 4F, 
00,ED,B0,12,C1 ,Dl,El,CD,2ö,BC t E 
5,EB,CD t eo> 

37B0 DATA 26, BC ,EB,E1 , 10,E7,F1 , 
DD,23,DD,23,3D,20,D<B,C9,B7,C8,F 
5,DD,6E , { M E> 

3790 DATA 88,AF,67,CD,1A,BC,2B, 
E5,Dl,2B,06,0B,E5,D5,C5,iA,Bl,4 
F,00,ED {HU 

3800 DATA BS, 12, Cl, Di, Ei, CD, 26, 
BC,E5,EB,CD,26„BC,EB,£1,10,E7,F 
1,DD,23 ct1D> 

3810 DATA DD,23,3D,2B,D0,C9,FE, 
03,C8,DD,66,O4,DD 1 6E,82,25,CD,t 
A,BC,EB {FP5 

3820 DATA 7B,3D,28,85,29,3D,2B, 
01,29,22,71,A6,EB,CD,29,BC,E5,1 
1,50,00 {qjj 

3B30 DATA 19, ES, El ,81 ,00,8B,C5, 
E5,D5,ED,4B,71,A6,ED,BB,EI,CD,2 
9,BC,E5 { HCJ 

3848 DATA Dl ,Ei ,E5,D5,ED,4B,7i , 
A6,ED,B0,E1,CD,29,BC,EB,E1,CD,2 
9,BC,C1 tDE > 

3850 DATA 18,DC,C9,3D ,B7,CB,43, 
21,40,FE,2B,7C,B5,20,FB,10,F6,C 
9,AF,C7 { K KJ 

ENDE DES LISTINGS 



Ende des Listings 



Haben Sie näcKIrägeii zu ühsefeii^iiitm^l 



HOTLINE 

056 51-3 00 13 Montags -Freitags von 14-16 Uhr 



-«* 



Endlich ist er da I 



Der neue Checksummer 

für die Sch»eid«r<-<oinpat*r CPC 464/ 664/ 6128 



Worauf alle Schneider-User bis- 
her sehnsüchtig gewartet haben, 
das wird jetzt an dieser Stelle ver- 
öffentlicht: Eine erheblich ver- 
besserte Chechsummerversion, 
Nun ist es möglich, schon bei der 
Eingabe einer Basiczeile festzu- 
stellen, ob ein Eingabefehler be- 
gangen 'wurde. 

Ab dieser Ausgabe finden Sie hin- 
ter jeder Zeile eine zweistellige 
Buchstabenkombination, die von 
geschweiften Klammern einge- 
rahmt wird. Anhand dieser Prüf- 
summe kann die Eingabe jetzt auf 
Ihre Richtigkeit hin untersucht 
werden. 
Um ein beliebiges TRONIC- 



Programm abzutippen, gehen Sie 
wie folgt vor: Laden Sie zuerst 
den Checksummer und starten 
Sie diesen mit "RUN". Auf die 
Frage nach dem verwendeten 
Computertyp antworten Sie bitte 
mit der entsprechenden Compu- 
terbezeichnung (464/ 664/ 6128} 
und geben Sie diese ein. Anschlie- 
ßend wird der Checksummer ak- 
tiviert und der BASIC-LOADER 
automatisch gelöscht. Nun kön- 
nen Sie mit der Eingabe des Pro- 
grammes beginnen. Ist eine Zeile 
komplett eingegeben, so wird die- 
se wie üblich mit "ENTER" abge- 
schlossen. Unterhalb der Zeile er- 
scheint daraufhin die Checksum- 



me. Stimmt diese mit der im Heft 
abgedruckten Summe überein, so 
wurde diese Zeile fehlerfrei einge- 
geben. 

Stimmen diese beiden Zeilen 
nicht überein, liegt ein Tippfehler 
vor, den Sie wie folgt korrigieren 
müssen. Dabei ist bei der Eingabe 
des Listings einiges zu beachten: 
Starten Sie niemals ein Pro- 
gramm, wenn der Checksummer 
aktiv ist. Speichern Sie das Pro- 
gramm nach der Eingabe sofort 
ab. Die Checksummen selbst 
werden nicht eingetippt. Sie kön- 
nen bei der Eingabe sowohl 
Groß- als auch Kleinbuchstaben 
verwenden. Bis auf eine Ausnah- 



me können alle Editiermöglieh- 
keiten verwendet werden. Aus- 
nahme: Eine Zeile kann nicht 
durch die Eingabe der Zeilen- 
nummer gelöscht werden. Um 
beispielsweise die Zeile 200 zu lö- 
schen geben Sie DELETE 200 ein. 
Leerzeichen die keine Bedeutung 
haben werden selbstständig igno- 
riert und gelöscht. Allerdings be- 
sitzen Leerzeichen innerhalb von 
Anführungsstrichen einen Wert 
und verändern somit die Check- 
summe. Für den PRINT-Befehl 
kann auch das Fragezeichen ver- 
wendet werden. Viel Spaß und 
fehlerf/eies Eingeben wünscht 
OTTFRIED SCHMIDT ! 



* SCHNEIDER CPC * 

* CHECKSUMMER V 2.0 * 
'# <C> 1986 * 

* OTTFRIED SCHMIDT * 



1 
2 
3 
4 
5 
6 

7 * 

8 ' 

1000 DATA 3E,FF,32,00,AC,CD,22,BF,F5,C5 
1010 DATA D5,E5,2A,20,BF,CD,61,DD,B7,28 
1020 DATA 54,E5,2A,20,BF,CD,6E,A0,EI,30 
1030 DATA 4A,CD,04,EE,CD,A3,E7,CD,63,E1 
1040 DATA 2A,20,BF,06,FF,AF,4F,7E,FE,G0 
1050 DATA 2B,05,BI,A8,23 f 10,F5,81 f AB,4F 
1060 DATA 3E,0D,CD,5A,BB,3E,0A,CD,5A,BB 
1070 DATA 3E,7B,CD,5A,BB,79,E6,F0,1F,1F 
1080 DATA lF,lF,C6,41,CD,5A,BB,79,E6 f 0F 
1090 DATA C6,41,CD,5A,BB,E1,D1,C1,F1,3E 
110O DATA 7D,C3,5A,BB,C9,E1,D1,C1,F1,C9 
1110 DATA CD,61,DD,B7,37,CB,CD»04,EE,D0 
1120 DATA 7E, FE, 20,20,01, 23, CD, D2,E6, 37 
1130 DATA 9F,C9, 00, 00, 00, 00, 00,00,00,00 
1140 MEMORY 8t9FFF:FaR i=«tA000 TD «cAOBS 
1150 READ a*:POKE i ,VAL ("fc-'+a*) :NEXT i 
1160 CLSsINPUT"BENUTZEN SIE EINEN CPC 46 
4/664 oder 6128" ;v* 

1170 IF v*<>"464 ,, AND v*<>"&64" AND v*<> 
"6128" THEN PRINT CHR*<7>sG0T0 1160 
1180 IF v*="464" THEN adr-&BD3Aspuf a=&A4 



ELSE IF v*="664" THEN adr=&BD5B:pu*a=St8 
A ELSE adr=&BD5E:pu-Fa=&8A 
1190 POKE &BF20,pufa:P0KE &BF21 ,&AC 
1200 POKE «tBF22,PEEK<adr>sPGKE &BF23.PEE 
K(adr+1);P0KE &BF24.PEEK <adr+2) 
1210 POKE adr,«tC3sP0KE adr+l,OsPQKE adr+ 
2,&A0 

1220 IP v*="664" THEN GOTO 1250 
1230 IF v*= ,, 6128" THEN GOTO 1300 
1240 GOTO 1340 

1250 POKE &AOI0,««52:P0KE fcAOi 1 ,&DEiPOKE 
ScA06F,Sc52:PGKE &A070,M?E 

1260 POKE «<A020, 80)4: POKE &A02 1 , &EE : POKE 
&A075,&D4:P0KE &A076,&EE 

1270 POKE &A07F,S £ AA:P0KE &A08O , 4E7* POKE 
8cA023 , ««96: POKE &A024 , *<E8 
1280 POKE StAO26,*t59:P0KE &A027,&E2 
1290 GOTO 1340 

1300 POKE &A010,&4D:P0KE &A01 1 ,M)EsPOKE 
&A06F , &4D : POKE St A07Ö , «tDE 

1310 POKE «tA020,8tCF:POKE Sc A02 1 , StEE : POKE 
8.A075,«(CF:P0KE &A076,8<EE 

1320 POKE StA07F,fcA5:PQKE Sc A080 , &E7 : POKE 
S( A023 , «<64 : POKE & A024 , «(ES 
1330 POKE «tA026,&54sP0KE &A027,*tE2 
1340 CLS: PRINT "CHECKSUMMER V2.0 IST JETZ 
T AKTIV!" 
1350 NEW 



omputronic 



Ä 



■ %■ .&:■ fi",^ : 



|j|H|||| 



^fisÄ'Sssisi 



«SäsSääSsS 



Masterblazer 



ülüHilliüiiis 



Fußball der Zukunft! 



Lange mußten wir warten, doch es hat sich wieder gelohnt! Unser 
Software- Champion von 1986 hat wieder zugeschlagen. Mit sei- 
nem Programmbeitrag „Masterblazer" fiir den kleinen Atari hat 
Oliver Cyranka wieder voll ins Schwarze getroffen. Ein absolutes 
Knüllerspiel, bei dem sich die lange Abtipparbeit wirklich mehr 
als lohnt 




f Wir stehen jetzt schon 20 tn vom Ball weg. langsam reicht's!" 



S T ach dem Laden des Spiels kann zwischen 
nehreren Varianten gewählt werden. Die 
Üpiele 'A' und 'B' unterscheiden sich darin, 
laß bei 'A' ein Halten des Balles möglich 
st, hingegen bei 'B'der Ball bei jeder Be- 
rührung sofort wieder abgeschossen wird, 
außerdem kann noch die Dauer eines 
Spiels eingestellt werden. Dies geschieht 
iurch Drücken von SELECT oder OPTI- 
ON. Mit dem DRUCK auf einer der Key- 
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boardtasten kann der letzte Spielstand 
nochmal angesehen werden. Mit START 
wird das Spiel begonnen. 

Jeder Spieler kontrolliert sein Fahrzeug 
mit Joystick 1 bzw. 2 auf seiner Hälfte des 
Bildschirms. Ura dies zu ermöglichen, wur- 
de der Bildschim, dessen obere Hälfte dem 
roten, die untere Hälfte dem violetten 
Fahrzeug folgt, geteilt. 



Drückt man den Joystick nach links oder 
rechts, dreht sich das Fahrzeug. Bewegen 
Sie den Joystick nach oben beschleunigen 
Sie. Ziehen Sie den Joystick nach unten, 
wird der Ball weggeschossen. Ziel ist es da- 
bei, den Ball in das entsprechende Tor, wel- 
ches sich am gegnerischen Spielfeldrand 
blinkend auf und ab bewegt, zu treffen. 
Die erreichte Punktzahl ist von der Entfer- 
nung aus der geschossen wurde abhängig, 
und kann zwischen eins und fünf liegen. 
Natürlich waren die einfachen Handha- 
bungsschwierigkeiten noch nicht genug. 
Betätigen Sie den Feuer knöpf, ist es sogar 
möglich Hindernisse zu legen, die den geg- 
ner beim Überfahren ins Schleudern brin- 
gen. Gegenüber dem eigenen Fahrzeug 
sind diese allerdings wirkungslos. Kommt 
das eigene Fahrzeug ins Schleudern, so ist 
ein Ballverlust sehr wahrscheinlich. Befrei- 
en können Sie sich aus dieser mißlichen Si- 
tuation nur, indem Sie die gegnerischen 
Fallen durch eigene neutralisieren. Sollten 
Sie keine Fallen mehr besitzen, weil die 
Stückzahl auf 120 pro Ballwechsel be- 
grenzt ist, müssen Sie durch gekonnte 
rechts/links Bewegungen mit dem Joystick 
sich befreien. 

Zur Eingabe: 

Das Basic-Programm 'DATA. BAS' gene- 
riert ein ablauffahiges Programm, das vom 
DOS 2 bzw. 2.5 aus mit der Funktion T ge- 
laden werden kann. Bei Benutzung eines 
Datenrecorders muß das so generierte Pro- 
gramm mit dem beiliegenden Kassetten- 
loader geladen werden. Nach dem Start 
werden die Datazeilen eingelesen und ge- 
prüft. Schließlich muß noch angegeben 
werden, ob das Programm auf Kassette 
oder Diskette geschrieben werden soll. 
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<IP> 108 REM MKMMKHMHWMKKK K MM K MHMKMMMM 

<FG> llö REH * WASTERITLAZER * 

<AE> 120 REM * PROGRAMM-GENERATOR » 

<NA> 130 REM « €1987> OLXUER CYRAHKA * 

<JD> 148 REM MWKKKWWKWKMMM W KKMMMWKKMKM 

<HK> 150 REM 

<EO> 169 REM *«* SIND ALLE ZEILEN DA ? * 

<HM> 170 REM 

<LM> 180 POKE 82,ßsDIM AS Cl> : ? CHR$ C12SJ 

r? :? "TESTS DURCHFUEHREN ? t J/NS " '. INPUT 

ASilF öSO"'**" THEH 360 
<MJ> 190 ? :? "DATZETLEN AUF UOLLSTAENDI 
GKEIT PRUEFEN":? f ? "ZEILE ! ■" 
<AK> 290 LIHE = PEEK «1361 +PEEK «137!) «256 
<MA> 210 FOR Z=100 TO 3898 STEP I8tLNR=P 
EEK CLINEJ +PEEK CLIHE+U «256 ä POSITION 8,7: 
? Z 

<AJ> 220 IF ZOLNR THEM ? "ZEILE "}Z> r " F 
EHLT ! ! S" :END 

<BL> 230 LINE=LIHE+PEEKtLXHE+23 i HEKT Z 
<HK> 248 REM 

<BC> 2SO REM *** STIMMEN DIE DATAS * *««* 
<HH> 260 REM 

<EE> 270 RESTORE 4ÖO ! TRAP 318:? :? "DATA 
5 HEROEN GEPRUEFT"(? :? "ZEILE : , " | 
<BO> 280 FOR Z = 489 TO 3898 STEP 18!SUM=0 
SPOSITION 8,11!? ZtFOR 1=1 TO 24;R£AD A( 
SUM=SUM+A*I:HEKT I 

<MN> 29© READ S : IF SOSUM TMEH ? "DATAFE 
HLER IN ZEILE ";Z;END 

<IP> 300 NEKT Z:? :? "DATAS IN ORDNUNG"! 
GOTO 360 

<0P> 310 ER=PEEKC195$ ! IF ER=6 AND SUM~tt8 
1? THEN 300 

<NF> 32Ö ? "FEHLER "jEftj" IN ZEILE ";ZiE 
ND 

<HK> 330 REM 

<JL> 348 REM * SPEIQHERRQUTIME EINLESEN 
« 

<HM> 358 REM 

<HI> 360 RESTORE : AD-39424 : FOR Z=33 TO 4 
4: FOR 1=1 TO 24: READ A:POKE AD, A : AD=AD+I 
:NEKT I:READ SUM:NEKT Z 

<KJ> 370 Z=520lHI=INTCZ/2563 :L0=Z-HI*256 
:POKE 39424+17, LO:POKE 39424+24, HI 
<PF> 388 ? "SPEICHERN AUF CASSETTE ODER 
DI5K ?«C/DJ"I INPUT A* I POKE 39679 , ASC CASl 
<JD> 390 K-USRC39424J : END 

<IC> 40O DATA 104,32,197,154,165,136,133 
,188,165,137,133,189,160,0,177,188,201,2 
32 , 208, 18 , 200 , 177 , 188 , 201, 48767 
<M0> 4IO DATA 3,208,3,76,56,154,160,2,17 
7, 188,141,188,154,32,43,154,76,12,154,24 
,165,188,109,188, 35445 

<MO> 420 DATA 154,133,188,144,2,230,189, 
96,160,1*177,188,201,128,208,3,76,193,15 
4,200,177,188,141,188,45587 

<EB> 438 DATA 154,160,5,162,0,177,188,14 
1 , 187 , 154 , 201 , 44 , 240 , 34 , 281 , 1S5 , 240 , 24 , 5 



6,233,48,144,15,173,3868S 

<DP> 448 DATA 187,154,56,233,58,176,7,23 

2,173,187,154,157,13,155,200,76,77,154,3 

2,43,154,76,56,154,33845 

<HG> 458 DATA 140,185,154,169,0,141,184, 

154, 141, 186, 154, 189, 13, 156, 141, 189 , 154, l 

72 , 186 , 154 , I 73 , 189 , 154 , 201 , 48868 

<HI> 468 DATA 48,248,16,24,173,184,154,1 

21,190,154,141,104,154,286,189,154,78,14 

0,154,238,186,154,282,288,58311 

<KF> 478 DATA 218,173,184,154,32,223,154 

,238,185,154,172,185,154,76,75,154,8,0,8 

,0,0,0,1,18,20447 

<EK> 488 DATA 100,32,244,154,98,162,32,1 

69,3,157,66,3,169,255,157,68,3,169,154,1 

57,69,3,169,8,39862 

<HF> 498 DATA 157,74,3,32,86,228,96,72,1 

62,32,169,11,157,66,3,169,0,157,72,3,157 

,73,3,184,24693 

<JP> 588 DATA 32,86,228,96,162,32,169,12 

,157,66,3,32,86,228,96,68,58,66,76,05,83 

,84,69,82,24945 

<PI> 518 DATA 46,67,79,77,155,8,8,8,0,8, 

8,6,8,8,8,8,8,57,56,8,8,8,0*0,3690 

<LC> 528 DATA 255,255,222,123,119,155,16 

9,8,141,47,2,169,97,133,218,189,124,133, 

219,169,8,133,228,169,41602 

<EG> 538 DATA 39,133,221,168,8,177,218,2 

48,13,177,218,141,94,124,169,8,141,95,12 

4, 76, 18, 124 , 280, 177, 37523 

<KP> 548 »ATA 218,141,94,124,208,177,218 

,141,95,124,208,177,218,240,59,141,96,12 

4,206,32,83,124,76,53,37543 

<HH> SSO DATft 124,160,0,162,0,177,218,12 

9,220,238,220,288,2,230,221,288,204,96,1 

24,288,248,206,94,124,50891 

<0K> 568 DATA 173,94,124,201,255,288,226 

,296,95,124,173,95,124,281,255,288,216,1 

72 , 96 , 124 , 32 , 83 , 124 , 76 , 42253 

<KH> 570 DATA 243,123,96,152,24,181,218, 

133,218,144,2,239,219,96,8,8,9,0,199,9,1 

,0,1,4,19177 

<ftp> 580 DATA 29,36,27,28,234,1,8,1,8,29 

,30,26,28,13,13,27,28,238,1,8,1,2,29,30, 

9784 

<GM> 596 DATA 4,1,26,4,1,13,1,2,27,28,22 

6 , 1 , , 1 , 2 , 29 , 38 , 6 , 1 , 26 , 6 , 1 , 13 , 1 , 5363 

<ML> 688 DATA 2,27,28,222,1,9,1,2,29,30, 

8,1,26,8,1,13,1,2,27,28,218,1,8,1,8140 

<BM> 618 DATA 2,29,30,19,1,28,19,1,13,1, 

2,27,28,214,1,8,1,2,29,38,18,1,26,1,6335 

<FI> 628 DATA 4,1,2,3,4,18,1,13,1,2,27,2 

8,216,1,0,1,2,29,30,10,1,26,1,8,5771 

<LD> 630 DATA 1,2,9,18,12,11,3,4,10,1,13 

, 1,2, 27, 28, 286, 1,8, 1,2, 29, 30, 18,1, 622S 

<BM> 648 DATA 26,1,12,1,2,9,18,12,11,9,1 

8,12,11,3,4,18,1,13,1,2,27,28,282,1,7389 

<BK> 658 DATA 8,1,2,29,38,18,1,26,1,16,1 

,2,9,10,12,11,9,10,12,11,9,18,12,11,3896 

<G8> 668 DATA *3, 4, 18, 1,13, 1,2, 27, 26, 198, 

1,8,1,2,29,30,10,1,26,1,2,1,2,4,4453 

<MA> 678 DATA 4,9,18,12,11,1,2,3,4,10,1, 
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13,1,2,27,28,194,1,8,1,2,29,38,18,6342 

<GB> 68» DATA 1,26,1,2,1,2,5,4,9,18,12,1 

1,1,2,3,4,18,1,13,1,2,27,28,198,703« 

<0J> 698 DATA 1,8,1,2,29,38,18,1,26,1,2, 

1,2,6,4,9,18,12,11,1,2,3,4,18,2862 

<GK> 766 DATA 1,13,1,2,27,28,186,1,8,1,2 

,29,36,18,1,26,1,2,1,2,7,4,9,16,3786 

<LC> 718 DATA 12,11,1,2,3,4,18,1,13,1,2, 

27,28,182,1,8,1,2,29,38,18,1,26,1,5628 

<DC> 728 &ATA 2,1,2,8,4,9,10,12,11,1,2,3 

,4,16,1,13,1,2,27,28,178,1,8,1,6774 

<FH> 730 DATA 2,29,38,18,1,26,1,2,1,2,4, 

4,9,16,12,11,4,1,61,4,4,9,10,12,3233 

<IK> 740 DATA 11,1,2,3,4,10,1,13,1,2,27, 

28 , 174 , 1 , 8 , 1 , 2 , 29 , 38 , 16 , 1 , 26 , 1 , 2 , 5166 

<CI> 750 DATA 1,2,4,4,9,10,12,11,8,1,61,- 

4, 4, 9, 18, 12, 11,1, 2, 3, 4, 18, 1,13, 2573 

<IH> 768 DATA 1,2,27,28,178,1,8,1,2,29,3 

0,18,1,26,1,2,1,2,4,4,9,18,12,11,3482 

<JG> 778 DATA 12,1,61,4,4,9,18,12,11,1,2 

,3,4,10,1,13,1,2,27,28,166,1,8,1,5693 

<JF> 780 DATA 2,29,38,16,1,26,1,2,1,2,4, 

4,9,16,12,11,16,1,61,4,4,9,18,12,3437 

<IA> 790 DATA 11,1,2,3,4,16,1,13,1,2,27, 

28,162,1,8,1,2,29,38,16,1,26,1,2,5818 

<EO> 800 DATA 1,2,4,4,9,18,12,11,20,1,61 

,4,4,9,18,12,11,1,2,3,4,10,1,13,2681 

<IM> 818 DATA 1,2,27,28,158,1,8,1,2,29,3 
8,10,1,26,1,2,1,2,4,4,9,18,12,11,3342 
<IM> 820 DATA 24,1,61,4,4,9,16,12,11,1,2 
,3,4,10,1,13,1,2,27,28,154,1,8,1,5453 
<JB> 838 DATA 2,29,38,18,1,26,1,2,1,2,4, 
4,9,10,12,11,20,1,61,4,4,9,10,12,3641 
<II> 840 DATA 11,1,2,3,4,18,1,13,1,2,27, 
28,158,1,8,1,2,29,38,10,1,26,1,2,4854 
<FP> 858 DATA 1,2,4,4,9,18,12,11,32,1,61 
,4,4,9,18,12, 11,1,2,3,4,16,1,13,2789 
<JB> 868 DATA 1,2,27,28,146,1,8,1,2,29,3 
8,18,1,26,1,2,1,2,4,4,9,18,12,11,3282 
<IL> 878 DATA 36,1,61,4,4,9,18,12,11,1,2 
,3,4,18,1,13,1,2,27,28,142,1,8,1,5213 
<GG> 886 DftTA 2,29,38,18,1,26,1,2,1,2,4, 
4, 9, 18 ,12, 11, 1,2, 9, 18, 38, 1,61, 4, 3851 
<HE> 898 DftTA 4,9,18,12,11,1,2,3,4,10,1, 
13,1,2,27,28,138,1,8,1,2,29,38,10,5398 
<CM> 9Ö8 DATA 1,26,1,2,1,2,5,4,9,18,12,1 
1,1, 2, 9, 18, 36,1 .,61, 4, 4, 12, 11, 9 ,3615 
<ÖJ> 918 DATA 10,1,4,12,11,3,4,10,1,13,1' 
,2,27^28,134,1,8,1,2,29,38,18,1,26,5329 
<GC> 920 DATA 1,2,1,2,4,4,9,10,12,11,4,1 
,61,1,6,9,10,12,11,9,18,32,1,61,4694 
<IF> 930 DATA 5,4,12,11,9,10,1,4,12,11,3 
,4,18,1,13, 1,2,27,28,130,1,0,1,2,4636 
<JE> 940 DATA 29,30,18,1,26,1,2,1,2,4,4, 
9,18,12,11,8,1,61,1,6,9,18,12,11,3285 
<HG> 950 DATA 9,18,28,1,61,1,6,12,11,9,1 
8,12,11,4,1,61,4,4,9,10,12,11,1,2,3275 
<FL> 960 DATA 3,4,18,1,13,1,2,27,28,126, 
1,0,1,2,29,30,10,1,26,1,2,1,2,4,3733 
<PP> 970 DATA 4,9,18,12,11,12,1,61,1,6,9 
,18,12,11,9,18,24, 1,61,1,6,12,11,9,4879 
<PP> 988 DATA 18,12,11,8,1,61,4,4,9,18,1 



2,11,1,2,3,4,18,1,13,1,2,27,28,122,5788 

<CI> 998 DATA 1,8,1,2,29,38,18,1,26,1,2, 

1,2,4,4,9,10,12,11,16,1,61,1,6,3424 

<DH> 1088 DATA 9,18,12,11,9,18,28,1,61,1 

,6,12,11,9,10,12,11,12,1,61,4,4,9,10,400 

3 

<HP> 1018 DATA 12,11,1,2,3,4,18,1,13,1,2 

,27,28, 118, 1,6,1,2, 29, 36, 18, 1,26, 1,4724 

<LG> 1828 DATA 2,1,2,4,4,9,18,12,11,28,1 

,61,1,6,9,10,12,11,9,10,16,1,61,1,4258 

<0D> 1038 DATA 6,12,11,9,10,12,11,16,1,6 

1,4,4,9,10,12,11,1,2,3,4,18,1,13,1,2495 

<0G> 1048 DATA 2,27,28,114,1,8,1,2,29,38 

,18,1,26,1,2,1,2,4,4,9,10,12,11,24,3378 

<FC> IQ 5 8 DATA 1,61,1,6,9,18,12,11,9,18, 

12,1,61,1,6,12,11,9,18,12,11,20,1,61,477 

8 

<HA> 1066 DATA 4,4,9,18,12,11,1,2,3,4,10 

,1,13,1,2,27,28,118,1,8,1,2,29,30,4989 

<ME> 1878 DATA 18,1,26,1,2,1,2,4,4,9,18, 

12,11,28,1,61,1,6,9,18,12,11,9,18,3499 

<LP> 1080 DATA 8,1,61,1,6,12,11,9,10,12, 

11,24,1, 61,4,4,9,10,12,11,1,2,3,4,3069 

<IG> 1098 DATA 10,1,13,1,2,27,28,186,1,0 

,1,2,29,38,10,1,26,1,2,1,2,4,4,9,3234 

<EI> llOO DATA 10,12,11,32,1,61,1,6,9,18 

,12,11,9,10,4,1,61,1,6,12,11,9,16,12,375 

5 

<0L> 1118 DATA 11,28,1,61,4,4,9,18,12,11 

,1,2,3,4,16,1,13,1,2,27,28,182,1,8,4687 

<LK> 1128 DATA 1,2,29,36,18,1,26,1,2,1,2 

,4,4,9,16,12,11,36,1,61,1,12,9,18,3882 

<DK> 1138 DATA 12,11,9,10,12,11,9,18,12, 

11,32,1,61,4,4,9,10,12,11,1,2,3,4,18,306 

6 

<LD> 1148 DATA 1,13,1,2,27,28,188,1,8,1, 

2,59,68,10,1,15,1,2,7,8,4,4,12,11,4022 

<FP> llSO DATA 9,18,38,1,61,1,8,9,18,12, 

11 , 9 , 18 , 12 , 11 , 3« , 1 , 61 , 4 , 4 , 9 , 16 , 12 , 11 , 428 

4 

<MI> 1160 DATA 1,2,3,4,18,1,13,1,2,27,28 

,98, 1,8, 1,4, 63, 61, 59, 60, 10, 1,15, 1,7148 

<AB> 1170 DATA 2,7,8,4,4,12,11,9,18,36,1 

,61,1,8,12,11,9,10,12,11,9,18,38,1,4859 

<JM> 1180 DATA 61,4,4,9,10,12,11,1,2,3,4 

,18,1,13,1,2,27,28,98,1,8,1,4,63,5249 

<CP> 1196 DftTA 61,59,68,18,1,15,1,2,7,8, 

4,4,12, 11,9,18,32,1,61,1,12,12,11,9,4883 

<BD> 1288 DATA 18,12,11,9,18,12,11,9,18, 

36, 1,61, 4, 4, 12, 11, 9, 18 ,1,2, 6, 5, 18,1,2913 

<PB> 1218 DATA 14,1,2,31,32,180,1,0,1,4, 

63,61,59,60,10,1,15,1,2,7,8,4,4,12,5247 

<Cft> 1220 DATA 11,9,18,28,1,61,1,5,12,11 

,9,18,12,11,4,1,61,1,6,9,18,12,11,9,3712 

<FB> 1238 DATA 18,32,1,61,4,4,12,11,9,18 

,1,2,6,5,18,1,14,1,4,31,32,61,62,182,798 

7 

<MN> 1240 DATA 1,8,1,4,63,61,59,68,18,1, 

15,1,2,7,8,4,4,12,11,9,10,24, 1,61,5677 

<PC> 1258 DATA 1 , 6*, 12 , 11, 9 , 18, 12, 11, 8 , 1 , 

61, 1,6, 9, 10,12,11,9, 18,28,1,61,4,4,4331 

<BP> 1268 DATA 12,11,9,18,1,2,6,5,18,1,1 
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4,1,4, 31 ,32, 61, 62, 186, ±,0,1, 4 »63,61, »411 
<AC> 1276 DATA 59,68,10,1,15,1,2,7,0,4,4 
,12,11,9,10,20,1,61,1,6,12,11,9,10,3590 
<BH> 1260 DATA 12,11,12,1,61,1,6,9,10,12 
,11,9,10,24,1,61,4,4,12,11,9,10,1,2,3463 
<GD> 1290 DATA 6,5,10,1,14,1,4,31,32,61, 
62,110,1,0,1,4,63,61,59,60,10,1,16,1,846 

5 

<PA> 1306 DATA 2,7,8,4,4,12,11,9,10,16,1 

,61,1,6,12,11,9,10,12,11,16,1,61,1,4309 

<KP> 131© DATA 6,9,10,12,11,9,16,20,1,61 

,4,4,12,11,9,10,1,2,6,5,10,1,14,1,2602 

<DC> 1320 DATA 4,31,32,61,62,114,1,0,1,4 

,63,61,59,60,10,1,15,1,2,7,0,4,4,12,5741 

<FH> 1336 DATA 11,9,10,12,1,61,1,6,12,11 

,9,10,12,11,20,1,61,1,6,9,10,12,11,9,388 

8 

<FM> 1346 DATA 10,16,1,61,4,4,12,11,9,1» 

,1,2,6,5,18,1,14,1,4,31,32,61,62,118,825 

9 

<KA> 1356 DATA 1,0,1,4,63,61,69,60,10,1, 

15,1,2,7,0,4,4,12,11,9,10,8,1,61,4725 

<BP> 1360 DATA 1, 6, 12 , 11, 9, 18, 12 , 11, 24, 1 

,61,1,6,9,10,12,11,9,18,12,1,61,4,4,4155 

<DB> 1370 DATA 12,11,9,18,1,2,6,5,10,1,1 

4,1,4,31,32,61,62,122,1,0,1,4,63,61,8699 

<MJ> 1380 DATA 59,68,10,1,15,1,2,7,8,4,4 

,12,11,9,18,4,1,61,1,6,12,11,9,18,3342 

<PH> ±396 DATA 12,11,20,1,61,1,6,9,10,12 

,11,9,10,8,1,61,4,4,12,11,9,10,1,2,3287 

<GG> 1400 DATA 6,5,10,1,14,1,4,31,32,61, 

62,126,1,0,1,4,63,61,59,60,10,1,15,1,867 

7 

<ME> 1410 DATA 2,7,8,5,4,12,11,9,10,1,2, 

12,11,32,1,61,1,6,9,10,12,11,9,10,3586 

<OK> 1420 DATA 4,1,61,4,4,12,11,9,10,1,2 

,6,5, 10, 1,14, ±,4, 31, 32, 61, 62, 130, 1,0861 

<MA> 1430 DATA 0,1,4,63,61,59,60,10,1,15 

,1,2,7,8,4,4,12,11,9,10,1,2,12,11,3324 

<PM> 1440 DATA 36,1,61,5,4,9,10,12,11,1, 

4,9,18,6,5,10,1,14,1,4,31,32,61,62,5805 

<AF> 1450 DATA 134,1,0,1,4,63,61,59,60,1 

0,1,15,1,2,7,8,4,4,12,11,9,10,38,1,4437 

<D€> 1460 DATA 61,4,4,9,10,12,11,1,4,9,1 

0,8,5,10,1,14,1,4,31,32,61,62,138,1,8237 

<OB> 1478 DATA 0,1,4,63,61,59,60,10,1,15 

,1,2,7,8,4,4,12,11,9,10,36,1,61,4,4996 

<PE> 1480 DATA 4,12,11,9,18,1,2,6,5,18,1 

,14,1,4,31,32,61,62,142,1,0,1,4,63,0082 

<AP> 1490 DATA 61,59,66,10,1,15,1,2,7,8, 

4,4,12,11,9,10,32,1,61,4,4,12,11,9,3975 

<TC> 1SOO DATA 10,1,2,6,5,10,1,14,1,4,31 

, 32 , 61 , 62 , 146 , 1 , 8 , 1 , 4 , 63 , 61 , 59 , 60 , 10 , 104 

48 

<GB> 1510 DATA 1,15,1,2,7,8,4,4,12,11,9, 

10,28,1,61,4,4,12,11,9,10,1,2,6,3074 

<FH> 1520 DATA 5,10,1,14,1,4,31,32,61,62 

,150,1,0,1,4,63,61,59,60,10,1,15,1,2,836 

O 

<JD> 1530 DATA 7,8,4,4,12,11,9,10,24,1,6 

1,4,4,12,11,9,10,1,2,6,5,10,1,14,2824 

<AM> 1548 DATA 1,4,31,32,61,62,154,1,0,1 



Computronic 



,4, 63, 61, 59, 60, 18,1,15,1, 2, 7, »,4,4, 6339 
<0L> 1550 DATA 12,11,9,10,20,1,61,4,4,12 
,11,9,10,1,2,6,5,10,1,14,1,4,31,32,3475 
<DO> 1S60 DATA 61,82,158,1,8,1,4,63,61,5 
9,68,18,1,15,1,2,7,8,4,4,12,11,9,10,475» 
<DC> 1S70 DATA 16,1,61,4,4,12,11,9,10,1, 
2,6,5,10,1,14,1,4,31,32,61,62,162,1,6889 
<HE> 1588 DATA 8,1,4,63,61,59,60,10,1,15 
,1,2,7,8,4,4,12,11,9,10,12,1,61,4,4492 
<AC> 1598 DATA 4, 12, 11,9,18,1, 2,6,5,16,1 
,14,1,4,31,32,61,62,166,1,6,1,4,63,8638 
<HI> 1688 DATA 61,59,60,10,1,15,1,2,7,8, 
4,4,12,11,9,10,8,1,61,4,4,12,11,9,3567 
<IB> 1618 DATA 18,1,2,6,5,18,1,14,1,4,31 
,32,61,62,170,1,0,1,4,63,61,59,66,10,108 

00 

<DA> 1626 DATA 1,15,1,2,7,8,4,4,12,11,9, 

10,4,1,61,4,4,12,11,9,10,1,2,6,2762 

<GC> 1636 DATA 5,10,1,14,1,4,31,32,61,62 

,174,1,0,1,4,63,61,59,60,10,1,15,1,2,862 

4 

<MG> 1640 DATA 7,8,8,4,12,11,9,10,1,2,8, 
5,10,1,14,1,4,31,32,61,62,170,1,0,8552 
<KL> 1650 DATA 1,4,63,61,59,68,18,1,15,1 
,2,7,8,7,4,12,11,9,18,1,2,6,5,10,2968 
<DP> 1660 DATA 1,14,1,4,31,32,61,62,182, 
1, O, 1,4, 63, 61, S9, 60, 10, 1,15, 1,2,7,8,7708 
<HP> 1670 DATA 6,4,12,11,9,10,1,2,6,5,10 
,1,14,1,4,31,32,61,62,186,1,0,1,4,7888 
<MH> 1688 DATA 63 , 61, 5», 68, 18, 1, ±5, ±, 2, 7 
,8,5,4,12,11,9,10,1,2,6,5,10,1,14,2566 
<BC> 1696 DATA 1,4,31,32,61,62,190,1,0,1 
,4,63,61,59,68,10,1,15,1,2,7,8,4,4,6591 
<DH> 1700 DATA 12,11,9,10,1,2,6,5,10,1,1 
4,1,4,31,32,61,62,194,1,0,1,4,63,61,9995 
<JC> 1710 DATA 59,60,10,1,15,1,16,7,8,12 
,11,9,10,12,11,9,18,12,11,9,10,6,5,10,29 
62 

<GP> 1720 DATA 1,14,1,4,31,32,61,62,190, 
1,0,1,4,63,61,59,60,10,1,15,1,12,7,8,807 
2 

<FD> 1730 DATA 12,11,9,10,12,11,9,10,6,5 
,10,1, 14, 1,4, 31, 32, 61, 62, 202 ,1,0,1,4,834 
8 

<DJ> 1740 DATA 63,61,59,60,10,1,15,1,8,7 
,8,12,11,9,18,6,5,10,1,14,1,4,31,32,3814 
<AE> 1750 DATA 61,62,206,1,0,1,4,63,61,5 
9,60,10,1,15,1,4,7,8,6,5,10,1,14,1,4621 
<MD> 1760 DATA 4,31,32,61,62,210,1,0,1,4 
,63,61,59,60,10,1,15,10,1,14,1,4,31,32,7 
554 

<AP> 1770 DATA 61,62,214,1,8,1,4,63,61,5 
9,60,8, 1, 15, 8, 1,14, 1,4, 31,32, 61, 62, 218,1 
3247 

<DC> 1788 DATA 1,0,1,4,63,61,59,60,6,1,1 
5,6,1,14,1,4,31,32,61,62,222,1,8,1,10393 
<HG> 1790 DATA 4,63,61,59,60,4,1,15,4,1, 
14 , 1 , 4 , 31 , 32 , 61 , 62 , 226 ,1,0, 1,12, 63, 61, 11 
493 

<EI> 1800 DATA 59,60,15,15,14,14,31,32,6 
1,62,238,1,0,1,8,63,61,59,68,31,32,61,62 
,234,18679 



Hl 



IflM 



<KL> 1810 DATA 1, 0,1, 4, 63, 61, 61,62,177,1 

<A0> 1820 DATA 85,05,05,65,67,95,126,250 

,67,95,126,250,234,176,176,176,213,245,1 

89, 175, 171, 170,170, 176,51991 

<rO 1836 DATA 85, 85, 85, 65 , 213, 24S , 169, 1 

7S, 171, 175, 189, 245, 213, 85, 85, 85, 176,176, 

176, 176, 171, 175, 169,245, 51258 

<FE> 1846 DATA 234,259,126,95,87,85,85,8 

5,178,178,176, 176, 234, 2S8, 126, 95, 234, 25« 

,190,175,171,176,176,176,51713 

<GG> 1856 DATA 170,176,176,178,234,256,1 

90,175,171,175,190,256,234,176,178,178,1 

76 ,176, 176, 178 , 171 , 175, 190 , 258 , 56S62 

<DH> 1868 DATA 85,85,85,85,85,85,85,85,8 

5, 85, 85, 85, »S, 85, 85, 85, 65, 65, 85, 85, 85, 85 

,65,85,25568 

<LF> 1870 DATA 0,60,102,116,116,162,86,0 

,6, 24, 56,24, 24, 2*, 126, 6, 0,60,162,12, 24, 4 

8,126,0,13886 

<IF> 1886 DATA 8,126,12,24,12,162,60,6,6 

,12,28,66,168,126,12,6,8,126,96,124,6,16 

2,66,0,16294 

<HP> 1896 DATA 8,68,96,124,162,182,66,6, 

8,126,6,12,24,48,48,9,0,60,102,68,182,18 

2,66,6,15684 

<EK> 1988 DATA 0,68,182,62,6,12,56,8,85, 

65,85,85,85,85,85,85,128,224,184,116,91, 

86,85,85,29376 

<DJ> 1916 DATA 8,6,0,8,128,224,184,118,0 

,0,6,6,2,11,46,185,2,11,46,185,229,149,8 

5,85,24870 

<6C> 1928 DATA 85, 85, 8S, 86, 91, 118 , 186, 23 

4,91,109,181,213,149,149,149,149,8,24,60 

,182,162,126,182,8,31113 

<6K> 1938 DATA 8,124,182,124,162,162,124 

,0,8,66,102,96,96,162,68,6,6,128,188,182 

,182,188,126,8,23626 

<PE_> 1948 DATA 6,126,96,124,96,96,126,8, 

0,126,96,124,96,96,96,6,6,62,98,96,118,1 

02,62,0,21650 

<DL> 1956 DATA 6,162,102,126,162,162,182 

,0,0,126,24,24,24,24,126,0,0,6,6,6,6,162 

,60,8,11292 

<JC> 1968 DATA 0,162,108,120,120,188,162 

,0,0,96,96,96,96,96,126,0,0,99,119,127,1 

07,99,99,0,23905 

<PF> 1978 DATA 0,162,118,126,126,110,102 

,0,0,60, 102, 102 , 102 , 182, 60 ,0,9, 124 , 102 , 1 

02,124,96,96,8,22880 

<HL> 1980 DATA 0,69,102,102,182,108,54,0 

,8,124,162,102,124,108,102,0,0,60,96,68, 

6,6,60,8,16352 

<FW> 1998 DATA 8,126,24,24,24,24,24,6,8, 

102,182,102,102,182,126,0,0,102,102,162, 

162,60,24,0,18698 

<BC> 2066 DATA 0,99,99,167,127,119,99,8, 

0,182,162,60,66,162,162,6,0,102,102,60,2 

4,24,24,6,16123 

<FK> 2618 DATA 0,126,12,24,48,96,126,6,2 

29,121,94,67,86,86,86,86,85,65,85,149,22 

9 , 165 , 174 , 171 , 36974 



<AÖ> 2828 DATA 170,176,170,170,178,176,1 

70, 170, 149, 149, 148, 148, 144, 144, 128, 128, 8 

6,66,22,22,6,6,2,2,24431 

<HN> 2830 DATA 48,235,138,196,196,138,23 

5,46,162,163,16,198,190,166,282,138,3,3, 

3,3,3,3,3,3,21273 

<JC> 2646 DAT« 24,24,24,248,246,0,8,8,24 

,24,24,248,248,24,24,24,8,0,0,248,248,24 

,24,24, 22286 

<0B> 2656 DATA 3,7,14,28,56,112,224,192, 

192,224,112,56,28,14,7,3,1,3,7,15,31,63, 

127,255,22394 

<IH> 2068 DATA 0, , 0, 0, IS, 15, 15, 15, 128, 1 

92,224,246,248,252,254,255,15,15,15,15,0 

,0,0,8,24558 

<HK> 2070 DATA 246,246,246,246,8,8,6,0,2 

55,255,8,0,8,8,6,8,0,0,8,0,0,6,255,255,1 

9238 

<LÖ> 2080 DATA 0,6,0,0,240,240,240,240,0 

,28,28, 119,119,8,28,8,8,6,8,31, 31,24,24, 

24,13262 

<CF> 2096 DATA 8,8,8,255,255,6,6,0,24,24 

,24,255,255,24,24,24,0,8,68,126,126,126, 

60,8,20928 

<ÖP> 2186 DATA 8,0,8,8,255,255,255,255,1 

92,192,192,192,192,192,192,192,0,0,0,255 

,255,24,24,24,37941 

<DD> 211© DATA 24,24,24,255,255,8,0,0,24 

O , 248 , 246, 248 , 248, 246 , 248 , 240 ,24,24,24,3 

1, 31,8, 0,0, 29006 

<IC> 2126 DATA 126, 96, 120, 96,126, 24, 30, O 

,0,24,68,126,24,24,24,6,0,24,24,24,126,6 

6,24,8,11346 

<GP> 2138 DATA 8,24,48,126,48,24,0,8,8,2 

4,12,128,12,24,0,8,32,126,153,76,98,139, 

116,6,18479 

<l_J> 2149 DATA 6,116,0,6,116,8,0,116,0,8 

,116,8,8,116,8,0,116,8,8,116,6,6,116,0,1 

1660 

<H0> 2156 DATA 0,116,8,0,116,8,0,116,9,8 

,116,0,8,212,6,0,48,66,141,148,48,116,0, 

6,17187 

<HI>> 2168 DATA 116,8,8,116,8,6,116,0,0,1 

16,0,6, 116,0,0,116,0,8,116,8,6,116,0,6,1 

8672 

<KD> 2170 DATA 116,6,0,115,6,0,116,0,6,1 

16,0,0,84,8,0,65,6,139,169,6, 141,48,2,16 

9,18738 

<0J> 2180 DATA 139,141,49,2,169,136,141, 

244 , 2 , 162 , 139 , 166 , 211 , 169 , 7 , 32 , 92 , 228 , 16 

9,261,141,0,2,169,35951 

<HD> 2196 DATA 140,141,1,2,169,192,141,1 

4,212,169,32,141,7,212,169,3,141,29,268, 

169,63,141,47,2,38618 

<OA> 2206 DATA 169,17,141,111,2,32,92,15 

2,169,56,141,195,2,169,122,141,194,2,141 

,192,2,169,88,141,34663 

<KH> 2218 DATA 193,2,169,116,141,196,2,1 

69,150,141,197,2,109,140,141,198,2,169,0 

,141,260,2,169,3,32*905 

<i.B> 2220 DATA 141,15,218,169,8,141,8,21 

0,76,107,141,169,8,141,150,146,174,150,1 



IG 



ß^ 



48 , 189 , 129 , ±4«, 141 ,127, 40034 

<MH> 223Ö DATA 140,189,130,148,141,120,1 

40,162,2,169, 3 ,32, 184, ±40,174, 150, 140 »5© 

,169,3,237,141, 140, 157,33430 

<FM> 2240 »ATA 142,140,173,127,140,133,2 

40, 173, 128, 140,133, 249,189,139, 140,141,1 

27, 140, 189, 13S, 140, 141, 128, 140, 45109 

<DC> 2250 DATA 182,3,169,7,32,184,140,17 

4, ISO , 140 , 173, 141 , 140 , 157 , 143 , 140, 24, 165 

,248,109,125,140,133,248,44073 

<LA> 2260 DATA 144,2,230,249,206,127,140 

, 288, 239, 24, 165 , 249, lOS, 39, 133, 249, 174, 1 

50,140,189,146,140,133,250,48657 

<LA> 2270 DATA 189,147,140,133,251,32,15 

3 , 140 , 238 , ISO ,140,238, ISO , 140 , 173 , 150 , 14 

O, 201 , 4 , 208 , 131 ,173, 142 , 140 , 46433 

<PA> 2286 DATA 141,4,212,173,143,140,141 

,5,212,238,199,2,173,152,140,141,0,208,1 

41,1,208,189,123,141,40035 

<LC> 2290 DATA 2,208,141,3,208,169,0,141 

,151,140,76,98,228,240,0,0,0,0,0,8,0,0,0 

,0,15138 

<OC> 2300 DATA 0,0,0,0,0,0,0,0,0,0,6,139 

,53,139,0,1,0,160,1,162,14,165,248,145,2 

3632 

<ZE> 2310 DATA 258,200,165,249,145,250,2 

OO, 208 , 24, 165, 248, 109, 126, 140, 133, 248, 14 

4,2, 230, 249, 202, 208, 238, 96, 51862 

<MM> 2328 DATA 45,127,140,141,141,140,24 

, 78 , 128, 140, 11© , 127, 140, 202 , 208,246, 96, 7 

2,138,72,169,62,141,24,36332 

<GG> 2330 DATA 208,169,3,141,8,208,141,9 

,288,141,10,200,169,0,141,3,208,141,4,20 

8,141,5,208,141,36263 

<CC> 2340 DATA 10,212,173,226,152,141,10 

,208,141,20,208,173,227,152,141,19,208,1 

73,223,152,141,0,208,173,44408 

<88> 2350 DATA 224,152,141,1,200,173,225 

,152, 141, 2, 200,141, 10,212,162, 14, 138, 24, 

74,185,2,141,10,212,31591 

<LH> 2360 DATA 141,23,200,202,202,208,24 

1,141,10,212,141,10,212,162,8,189,191,2, 

157,17,208,202,208,247,44871 

<CE> 2370 DATA 169,0,141,8,208,141,9,268 

,141,10,203,173,144,140,141,4,212,173,14 

5,140,141,5,212,173,48353 

<E0> 2338 DATA 186,141,141,1,208,141,0,2 

08,173,105,141,141,3,288,141,2,208,173,2 

10,146,141,5,208,173,48888 

<CK> 2398 DATA 211,146,141,4,208,104,170 

,104,64,0,0,173,180,152,240,3,76,228,152 

,32,222,123,169,128,38455 

<B0> 2480 DATA 141,174,147,141,175,147,1 

69,8,141,12,147,141,14,147,133,77,169,24 

7 , 141 , 16 , 147 ,169, 38,141 , 35980 

<CB> 2418 DATA 129,148,169,1,141,130,140 

,169,118,141,131,140,169,1,141,132,140,1 

69,182, 141 , 135 , 146, 189 , 1 , 36774 

<DB> 2420 DATA 141,136,140,169,22,141,13 

7, 148, 169 , 1 , 141 , 138 , 146 , 169, 70, 141 , 133, 1 

48, 169, 1,141, 134, 140, 169, 37971 

<H8> 2430 DATA 54,141,139,140,169,1,141, 



140, 140 , 169 , 5 , 141 , 94, ISO, 141 , 95 , 150, 169 , 

210,141,93,150,169,1,37491 

<HK> 2440 DATA 141,92,150,169,7,141,188, 

147,141,189,147,141,186,147,141,187,147, 

169, 8, 141 , 114, 152 , 141 , 212 , 43385 

<JL> 2450 DATA 146,141,168,147,141,169,1 

47 , 169 , 3 , 141 , 164 ,147, 141 , 167, 147 , 169 ,7,1 

41, 165, 147, 141, 168, 147, 32, 39199 

<GJ> 2460 DATA 92,152,169,1,141,151,140, 

169,63,141,47,2,173,151,140,208,251,169, 

1 , 141 , 151 , 148, 32 , 157, 38062 

<FG> 2470 DATA 145,32,115,152,173,31,208 

, 201, 7, 240, 8, 169, 1, 141, ISO, 152, 141, 114, 1 

52,286,184,147,248,3,41122 

<Prt> 2488 DATA 76,282,142,169,8,141,184, 

147 , 286 , 190 , 147 , 288, 25, 169 , 2 , 141 , 198 , 147 

, 173, 188, 147, 281 , 7, 240, 44129 

<KF> 2490 DATA 3,238,188,147,173,189,147 

,281,7,248,3,238,189,147,173,114,152,248 

, 10, 206, 114, 152, 201, 1, 42152 

<AA> 2588 DATA 208,96,76,107,141,169,8,1 

41,38, 147, 174 , 38 , 147 , 189 , 126* 2 , 141 , 39 , 14 

7, 169, 4, 44, 39, 147, 29223 

<GD> 2510 DATA 208,20,169,0,141,184,150, 

254 , 164, 147, 189, 164,147, 281 , 8, 208, 5, 169, 

8, 157, 164, 147, 169, 8, 37836 

<MD> 2528 DATA 44,39,147,288,28,169,0,14 

1,184,150,222,164,147,189,164,147,201,25 

5, 288, 5, 169, 7 , 157, 164, 43881 

<D6> 2536 DATA 147,169, 1,4*, 39, 147, 288,8 

,222,188,147,288,3,254,188,147,238,38,14 

7,173,38,147,281,2,39785 

<HC> 2548 DATA 200, 168, 173, 165, 147, 141, 1 

66, 147, 173, 184, 147, 141,167, 147, 169 , O, 141 

, 38, 147, 174 , 38, 147, 222, 188, 41868 

<M0> 25SO DATA 147,240,3,76,34,144,189,1 

88,147,157,186,147,174,212,146,240,9,282 

,236,38,147,208,3,254,45625 

<BC> 2568 DATA 186,147,201,7,288,3,76,34 

, 144, 174, 38, 147, 189, 168, 147, 248 , 41 , 222, 1 

68,147,254,164,147,189,46729 

<CF> 2S70 DATA 164,147,201,8,283,5,169,0 

, 157, 164 , 147 , 173, 177, 158 , 281 , 6, 288, 5, 169 

,0,141,177,150,169,38882 

<JA> 2SSO DATA 1,157,188,147,173,155,147 

,141,166,147,173,38,147,18,170,188,164,1 

47,24,189,129,140,121,192,41261 

<JD> 2590 DATA 147,157,129,140,144,3,254 

, 130, 148, 188, 164, 147, 56, 189, 129, 140, 249, 

200 , 147 , 157 , 129 , 140, 176, 3, 42896 

<HJ> 2688 DATA 222,130,140,188,164,147,2 

4, 189 , 13S, 140, 121, 208, 147 , 157, 135, 140, 14 

4, 3, 254, 136, 140, 188, 164, 147, 44276 

<J£> 2618 DATA 56,189,135,148,249,216,14 

7,157,135,140,176,3,222,136,140,174,38,1 

47,189,47,147,208,121,188,43267 

<OP> 2628 DATA 49,147,185,6,139,133,252, 

185, 7, 139, 133 , 253 , 168, 23, 177 , 252, 141 , 51, 

147,189,174,147,240,51,44220 

<JB> 2630 DATA "l89, 132, 2, 288, 46, 189, 172, 

147,205,51,147,240,16,160,5,185,176,147, 

285,51,147,248,6,136,39692 



Oomputronic 



53 



0® 



<0t>> 2640 DATA 208,245,76,211,143,160,23 

,169,170,147,145,262,222,174,147,173,189 

,150,201,5,20», 5,169,0,41225 

<ÜP> 2650 DATA 141,189,150,160,9,173,3«, 

147,10,170,185,52,147,205,51,147,208,25, 

185, 88 , 147 , 221 , 164, 147 , 48946 

<HH> 2660 DATA 288,17,185,124,147,157,16 

4 , 147 , 174 , 38 , 147 , 169 , 1 , 157 , 47 , 147 ,76,1,1 

43 , 280 , 192 , 36 , 208 , 218 , 39928 

<AL> 2670 DATA 174,38,147,169,0,157,47,1 

47,173,51,147,174,38,147,221,172,147,208 

,15,189,168,147,208,10,40299 

<KH> 2680 DATA 169,58,157,168,147,169,1, 

157,188,147,238,38,147,173,38,147,201,2, 

240,3,76,219,142,173,39826 

<ND> 2690 DATA 166,147,141,165,147,173,1 

29,140,141,41,147,173,130,140,141,42,147 

,173,131,148,141,43,147,173,39490 

<DD> 2760 DATA 132,140,141,44,147,159,12 

3,141,139,148,32,33,148,173,45,147,141,4 

6,147,173,135,140,141,41,35221 

<KP> 2710 DATA 147,173,136,140,141,42,14 

7, 173, 137, 140, 141, 43 , 147, 173 , 138, 140, 141 

,44,147,169,49,141,139,148,38416 

<HO> 2720 DATA 32,33,148,173,45,147,201, 

2,48,37,201,100,16,33,141,14,147,56,169, 

100,237,45,147,24,29628 

<HI> 2738 DATA 105,120,141,16,147,173,46 

, 147, 141 , 152, 140,56, 169, 246, 237, 46, 147, 1 

41,105,141,76,175,144,169,41702 

<PJ> 2740 DATA 0,141,152,140,141,105,141 

,169,123,141,3,208,141,2,208,169,170,141 

, 15, 147 , 169, 123 , 141 , 106 , 38398 

<M0> 2750 DATA 141,169,0,141,38,147,174, 

38,147,24,169,36,125,160,147,133,253,169 

,0,133,252,189,13,147,30969 

<IP> 2760 DATA 141,12,147,189,164,147,14 

1,40,147,32,214,146,238,38,147,173,38,14 

7 , 201 , 4 , 240 , 3 , 76 , 198 , 37516 

<LG> 2778 DATA 144,173,212,146,208,3,76, 

145,145,201,1,208,72,172,164,147,162,0,3 

2,189,148,173,114,152,38764 

<0L> 2780 DATA 288,56,173,250,154,201,98 

,240,19,173,168,147,248,7,169,7,45,10,21 

0,240,7,173,120,2,34295 

<ND> 2790 DATA 281,13,208,30,169,0,141,2 

12, 146, 141, 169, ISO, 173, 164, 147, 141,92, 15 

O , 169 , 4 , 141 , 94 , 150 , 141 , 39396 

<CH> 2800 DATA 96,150,169,20,141,93,150, 

32,57,149,76,148,145,261,2,288,72,172,16 

6,147,162,2,32, '189,35355 

<KM> 2818 DATA 148,173,114,152,208,56,17 

3,250,154,201,98,248,19,173,169,147,240, 

7,169,7,45,10,210,240,40253 

<DP> 2828 DATA 7,173,121,2,201,13,208,30 

,169,0,141,212,146,141,169,150,173,166,1 

47,141,92,150,169,4,38603 

<FC> 2830 DATA 141,94,150,141,95,150,169 

,20,141,93,150,32,57,149,76,148,145,32,5 

7,149,32,114,151,32,29154 

<0L> 2840 DATA 196,150,76,20,142,169,0,1 

41,38,147,173,38,147,19,178,189,129,140, 



141,41, 147, 189,138, 148, 37259 

<H0> 2856 DATA 141,42,147,173,133,140,14 

1,43,147,173,134,140,141,44,147,169,125, 

141,139,148,32,33,148,173,36977 

<CD> 2868 DATA 45,147,141,46,147,169,7,1 

41,182,147,32,38,149,140,213,146,189,135 

,140,141,41,147,189,136,48845 

<EC> 2870 DATA 140,141,42,147,173,139,14 

8, 141 ,43,147, 173 , 148 , 146 , 141 , 44 , 147, 169 , 

54, 141, 139, 148, 32, 33, 148 , 34616 

<00> 2880 DATA 174,38,147,232,236,212,14 

6,248,68,173,213,146,248,55,169,10,141,1 

82,147,32,38,149,192,1,37585 

<GD> 2899 DATA 288,43,173,135,150,249,38 

,142,212,146,173,94,150,240,22,201,1,240 

,18,281,2,246,14,174,38719 

<AH> 2988 DATA 38,147,169,1,157,188,147, 

173,92,150,157,164,147,169,0,141,135,150 

,141,94,159,174,38,147,38659 

<JD> 2910 DATA 173,45,147,201,2,48,16,20 

1,110,16,12,157,206,146,173,46,147,167,2 

08 , 146 , 76 , 92 , 146 , 169 , 37976 

<LM> 2920 DATA 0,157,208,146,238,38,147, 

173,38,147,281,2,240,3,76,162,145,173,20 

6,146,141,169,146,172,42872 

<KB> 2930 DATA 170,146,32,172,145,173,16 

9,146,141,170,146,24,173,208,146,141,5,2 

00,185,2,141,4,288,24,34188 

<BH> 2948 DATA 173,207,146,105,121,141,1 

69,146,172,171,146,32,172,146,173,169,14 

6, 141, 171, 146, 24, 173, 209, 146,43884 

<CF> 29SO DATA 141,216,146,105,2,141,211 

,146,96,0,0,0,162,6,169,0,153,0,35,200,2 

92,298,249,162,36208 

<AP> 2968 DATA 0,172,169,146,189,201,146 

,153,0,35,298,232,224,5,208,244,96,6,15, 

15,15,6,0,130,27964 

<P8> 2979 DATA 0,0,0,0,0,0,172,12,147,13 

6,136,162,0,109,15,147,145,2521200,232,2 

24,18,288, 24S, 43911 

<I_F> 2988 DATA 169,9,141,183,147,172,12. 

147,173,40,147,18,19,10,170,198,253,136, 

169 , 8 , 145 , 2S2 , 288 , 189 , 41736 

<MC> 2999 DATA 224,147,145,252,232,299,2 

06,183,147,288,244,96,8,58,9,179,247,0,0 

,0,8,0,24,24,23213 

<KD> 3009 DATA 60,60,126,126,255,265,126 

,24,69,126,0,0,0,0,0,0,0,0,9,0,0,8,0,0,6 

741 

<DF> 3Ö19 DATA 0,19,66,0,5,6,5,6,5,6,14, 

3,4,3,4,3,4,13,131,132,131,132,7,8,12316 

<JH> 3820 DATA 7,8,7,8,15,135,136,135,13 

6,1,2,1,2,1,2,26,0,8,1,1,2,2,1,2,4943 

<JP> 3030 DATA 2,3,3,4,4,3,2,2,4,4,9,0,8 

,6,7,7,7,0,8,8,6,4,4,5,1221 

<LE> 3048 DATA 5,6,6,5,6,6,5,5,4,4,5,0,0 

,7 a 7,6,fi,7,0,Oi6,6,2,2,12O6 

<FP> 30SO DATA 4,4,3,3,3,2,2,4,4,2,2,1,1 

,0,0,1,3,1,1,3,3,7,7,3,823 

<PO> 3860 DATA 0,0,84,65,65,64,28,20,0,6 

1,9,10,11,12,0,0,30,30,7,7,7,7,2,2,4319 

<CC> 3070 DATA 0,1,1,1,0,0,0,0,8,0,0,0,0 
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,1,1,1,1,1,8,8,8,8,8,1, 113 

<HH> 3080 DATA 0,0,0,1,1,1,0,0,0,0,24,24 

,60,60, 126,0,0,8,0,12,28,30,30,0,6551 

<0J> 3898 DATA 0,0,8,8,12,12,14,0,0,0,8, 

8,4,4,2,0,0,0,0,0,0,0,0,0,608 

<XH> 3100 DATA 0,0,16,16,32,32,64,0,0,0, 

16,16,48,48,112,0,0,16,16,48,56,120,120, 

0,12384 

<IJ> 3HO DATA 0,169,0,141,45,147,173,42 

, 147, 28S, 44, 147, 248, 5, 48, 52, 76, 59, 148, 17 

3,41,147,205,43,32387 

<JH> 3120 DATA 147,48,41,56,173,41,147,2 

37,43,147,141,17,147,173,42,147,237,44,1 

47,141,18,147,208,58,35775 

<ML> 3138 »ATA 173,17,147,201,128,16,51* 

56,173,139,148,237,17,147,141,45,147,76, 

138,148,56,173,43,147,34474 

<KF> 3140 DATA 237,41,147,141,17,147,173 

,44,147,237,42,147,141,18,147,208,17,173 

,17,147,201,128,16,10,31702 

<PM> 3156 DATA 24,173,139,148,109,17,147 

,141,45,147,96,0,0,128,128,128,128,179,1 

76,169,165,172,165,178,40312 

<JM> 3160 DATA 128,145,128,144,144,144,1 

44,128,128,186,165,169,180,128,144,144,1 

44,128,128,179,176,169,165,172,46546 

<DJ> 3170 DATA 165,178,128,146,128,144,1 

44,144,144, 128,128,128,128,189,130,140,1 

41, 134, 140,24, 189,129, 140,121, 40853 

<NF> 3180 DATA 6,149,141,133,140,144,3,2 

38,134,140,56,173,133,140,249,14,149,141 

,133,140,176,3,206,134,39808 

<FH> 3198 DATA 140,189,136,140,141,140,1 

40,24,189,135,148,121,22,149,141,139,140 

,144,3,238,148,140,56,173,38206 

<IL> 3200 DATA 139,140,249,30,149,141,13 

9 , 148 , 176 , 3 , 206 , 140 ,140, 96, 0,6, 8,6,0,0,0 

,0,0,8,14834 

<HL> 3210 DATA 0,0,0,6,8,6,10,8,0,0,0,0, 

0,10,0,0,0,8,10,8,8,8, 168 , , 4S48 

<MH> 3228 DATA 173,18,147,288,11,56,173, 

182,147,237,17,147,144,2,188,1,96,173,94 

,150,288,3,76,91,32398 

<HB> 3238 DATA 158, 268, 93, 158, 268, 8, 169 , 

20,141,93,150,206,94,150,162,8,188,92,15 

0,24,189,133,148,121,37146 

<KM> 3240 DATA 192,147,157,133,140,144,3 

,254,134,148,188,92,158,56,189,133,140,2 

49,288, 147,157,133,140,176,45850 

<ftö> 3250 DATA 3,222,134,140,188,92,150, 

24,189,139,140,121,208,147,157,139,140,1 

44,3,254,148,140,188,92,42228 

<MJ> 3268 DATA 158,56,189,139,146,249,21 

6,147,157,139,148,176,3,222,140,140,173, 

133, 148, 141, 127,148, 173, 134, 43966 

<CN> 3270 DATA 140, 141, 128, 140, 162, 2, 32, 

190,148,24,173, 127,140,109,96,150,141,12 

7,140,173,128,148,109,97,37451 

<H0> 3288 DATA 150,141,128,140,24,173,12 

7, 140, 105,0,133, 252, 173, 128, 148,185,39,1 

33, 253, 173,139, 140, 141, 127, 41410 

<CB> 3290 DATA 148,173,148,148,141,128,1 



40, 162, 3 , 32, 19«, 140, 174, 1*7, 148, 24, 165, 2 

52,185,240, 133, 2S2, 144,2,41689 

<PJ> 3380 DATA 230,253,282,208,242,168,8 

,177,252,141,51,147,201,131,240,15,201,1 

32,240,11,201,135,248,20,43814 

<MA> 3310 DATA 201,136,240,16,76,40,150, 
173,114,152,208,18,162,17,32,181,152,76, 
38,150,173,114,152,208,37232 

<EC> 3320 DATA 5,162,43,32,181,152,169,3 
0,141,114,152,169,0,141,148,150,162,0,18 
9,98,158,26S,51,147,37195 

<0D> 3330 DATA 288,22,189,110,150,285,92 

,156,288,14,189,122,150,141,92,150,189,0 

, 141, 144, 150, 76, 78, 149, 36966 

<CA> 3340 DATA 232,224,12,208,221,206,95 

, 150, 248, 3 , 76 , 78, 149, 173 , 94 , ISO , 141 ,95,1 

50,96,1,4,2,2,26965 

<HG> 3358 DATA 199,4,13,13,13,14,14,14,1 

5,15,15,26,26,26,4,3,2,0,1,2,0,7,6,6,275 

8 

<BE> 3366 DATA 5,4,6,7,8,6,5,4,2,3,4,0,1 

,2,5,8,207,286,285,204,201,199,196,192,3 

3415 

<PK> 3370 DATA 3,200,196,192,20,160,161, 

162,163,164,165,166,167,168,169,170,171, 

172,173,174,175,171,168,164,49941 

<8F> 3388 DATA 168,7,18,267,11,201,5,2,1 

92,6,193,134,200,66,195,192,4,4,195,2,8, 

5,33,98,24490 

<F0> 3398 DATA 195,161,160,0,206,134,150 

,240,3,76, 113, 151, 169, 3, 141, 134, ISO ,174, 

135, 150 , 224, 8, 248, 14, 38124 

<8L> 3488 DATA 238, 135, ISO, 189, 136, ISO, 1 

41,1,218,169,208,141,8,210,174,144,150,2 

24,3,240,14,238,144,158,43496 

<AC> 3410 DATA 189,145,150,141,3,210,169 

,30,141,2,210,174,148,150,224,28,240,22, 

238,148,158,189,149,158,43875 

<IF> 3428 DATA 141,7,218,141,5,218,169,7 

2,141,6,218,233,1,141,4,210,174,169,150, 

224,7,248,14,238,41026 

<MM> 3438 DATA 169,158,189,178,158,141,1 

,218,169,18,141,8,210,174,177,158,224,6, 

246,14,238,177,158,189,44826 

<MH> 3448 DATA 178,150,141,5,218,169,12, 

141,4,218,174,184,150,224,4,240,14,238,1 

84,158,189,185,150,141,45332 

<HF> 3450 DATA 7,218,169,60,141,6,218,17 

4,189,150,224,5,248,19,238,189,158,189,1 

98,150,141,3,218,173,45053 

<HL> 3460 DATA 189,158,18,18,185,6,141,2 

,218,96,286,81,152,248,3,76,32,152,189,9 

,141,81,152,169,33774 

<AP> 3478 DATA 0,141,38,147,174,38,147,1 

89,67,152,133,252,189,69,152,133,253,189 

,84,152,141,79,152,189,44134 

<KH> 3480 DATA 86,152,141,88,152,32,33,1 

52 , 174 , 38 , 147 , 189 ,63,152, 157 , 67 , 152 , 133 , 

252,189, 65, 152 J 157, 69, 39259 

<AX> 3498 DATA 152,133,253,189,88,152,14 

1,79,152,189,90,152,141,80,152,32,33,152 

, 174, 36 , 147 , 189 , 82 , 152; 36863- 
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<HH> 3588 DATA 288, 38, 24, 189,63, 1.52, 165, 

242,157,63,152,144,3,254,65,152,169,75,1 

52 , 221 , 63, 152 ,266, 51 , 46681 

<GM> 3510 DATA 189,77,152,221,65,152,268 

,43,169,1,157,82,152,76,19,152,56,189,63 

,152,233,242,157,63,38656 

<BH> 3526 DATA 152,176,3,222,65,152,189, 

71, 1S2, 221, 63, 152, 288, 13, 189, 73, 152, 221, 

65,152,268,5,169,6,36715 

<ME> 3538 »ATA 157,82,152,238,38,147,173 

, 38 , 147 , 281 , 2 , 246 , 3 , 76 , 132 , 151 , 96 , 162 , 3 , 

173,79,152,168,8,32798 

<GA> 3548 DATA 145,252,288,173,88,152,14 

5,252,24,165,252,185,242,133,252,144,2,2 

36,253,282,288,229,96,185,58429 

<Pfi> 3558 DATA 95,54,81,165,95,54,81,105 

,95,54,81,225,215,88,187,8,6,1,8,8,3,7,4 

,8,14897 

<BH> 3568 DATA 131,135,132,136,169,8,178 

,157,8,35,157,0,36,157,8,37,157,8,38,157 

,6,39,282,288,26994 

<PF> 3S78 DATA 238,96,6,173,114,152,288, 

33 , 286 , 179 , 152 , 268 , 28 , 169 , 68 , 141 , 179 , 152 

, 162 , 3 , 222 , 165 , 148 , 189, 43171 

<EL> 3588 DATA 165,148,281,143,268,11,16 

9,153,157,165,148,282,248,4,76,132,152,9 

6,169,28,141,114,152,141,38964 

<MJ> 3598 DATA 188,152,169,8,141,148,158 

, 169 ,144,141, 166 , 148 , 141 , 167 , 148 , 141 , 168 

,148,96,68,8,56,169,5,33724 

<NE> 3688 DATA 237,94,158,141,221,152,14 

2,222,152,254,141,148,189,141,148,282,20 

1 , 154 , 288 ,8,169, 144 , 157 , 142 , 47381 

<FF> 3618 DATA 148,76,193,152,174,222,15 

2,286,221,152,208,229,96,8,0,8,8,0,0,8,1 

69,8,141,1,23818 

<CK> 3628 DATA 218,141,3,210,141,5,210,1 

41, 7 ,218, 168, 118, 162, 6, 169 , 255, 153, 8 , 36, 

153,8,37,153,8,29496 

<AG> 3638 DATA 38,286,282,288,241,169,11 

2,141,224,152,162,0,56,189,155,148,253,1 

81, 148,248, 4, 176, 23,144,42584 

<HH> 3646 DATA 8,232,224,4,248,26,76,12, 

153,169,152,141,223,152,169,184,141,225, 

152 , 76 , 56, 153 ,169,48, 48325 

<HB> 3658 DATA 141,223,152,169,72,141,22 

5,152,162,63,142,227,152,56,169,15,237,2 

27,152,141,226,152,32,183,42746 

<AE> 3668 DATA 153,173,31,288,281,7,288, 

8,282,224,48,208,229,76,56,153,162,228,1 

68,98,169,7,32,92,36987 

<AJ> 3678 DATA 228,32,222,123,76,8,139,1 

69, 8, 141, 124, 153, 169, 12, 141, 125, 153, 286, 

124,153,288,251,286,125,44598 

<PN> 3680 DATA 153,288,246,96,8,0,169,25 

5 , 141 , 252 , 2 , 189 , 145 , 141 , 46 , 2 , 169 , 154 , 141 

,49,2,169,224,141,36964 

<FI> 3698 DATA 244,2,169,6,141,1,218,141 

,3,218,141,5,210,141,7,218,169,122,141,1 

96,2,169,54,141,36025 

<MG> 3780 DATA 197,2,169,170,141,198,2,1 

69,92,141,199,2,169,78,141,192,2,141,193 



,2,141,194,2,169,35872 

<EK> 3718 DATA 15,141,195,2,169,32,141,7 

,212,169,3,141,29,268,169,62,141,47,2,32 

,92,152,162,56,29232 

<EK> 3726 DATA 166,48,169,255,153,8,36,1 

53,8,37,153,8,38,288,282,288,241,169,3,1 

41,8,268,141,9,33948 

<PP> 3738 DATA 288,141,10,288,169,4,141, 

111,2, 169, 80, 141, 8,288, 169, 112 .,141, 1,268 

,189,144,141,2,288,36526 

<MK> 3746 DATA 162,8,169,128,157,8,35,17 

3,18,218,157,6,32,169,3,45,18,218,185,1, 

157, 0, 33,282, 25928 

<JD> 3750 DATA 288,232,169,61,141,8,2,16 

9,155,141,1,2,169,192,141,14,212,169,0,1 

33,77,32,103,153,31226 

<HF> 3768 DATA 32,183,153,173,31,288,281 

,3,268,15,238,18,155,173,16,155,281,154, 

288,5, 169, 145, 141, 16, 36819 

<PD> 3778 DATA ISS, 173, 31, 288 , 281, 5, 208, 

15,238,250,154,173,258,154,281,99,206,5, 

169,97,141,258,154,173,47386 

<PB> 3788 DATA 252,2,281,255,208,34,173, 

31,268,281,6,208,188,169,144,182,3,157,1 

55,148, 157,181,148,157,43821 

<JJ> 3790 DATA 165,148,202,288,244,169,0 

, 141,188,152,173,16,155,141,166,148,96,2 

40, 112, 112,112, 112, 112, 112,39743 

<B_N> 3880 DATA 71,177,154,112,112,112,11 

2, 112, 112, 112, 78,197,154, 6, 11?, 112, 6, 112 

,6,112,6,6,65,145,24772 

<FJ> 3816 DATA 154,8,8,8,8,45,33,51,52,3 

7,50,34,44,33,50,37,50,0,8,8,8,0,0,0,628 

5 

<MF> 3828 DATA 8,164,165,179,169,167,174 

,165,164,0,8,162,185,8,8,8,6,175,172,169 

,182,165,178,128,36165 

<80> 3838 DATA 163,185,178,161,174,171,1 

61,136,145,153,152,151,137,8,8,8,8,8,115 

,112,185,161,188,0,25258 

<BA> 3848 DATA 26,0,97,8,8,8,8,0,0,0,8,1 

15,112,185,101,108,188,97,117,181,114,8, 

26,8,18547 

<KJ> 3858 DATA 145,144,144,8,8,239,248,2 

44,233,239,238,148,243,229,236,229,227,2 

44 , 148, 243, 244 , 225 , 242 , 244 , 65552 

<GG> 3868 DATA 8,8,8,6,239,228,229,242,8 

,8,244,225,243,244,225,244,245,242,8,8,0 

,72,138,72,48347 

<I0> 3878 DATA 152,72,160,38,24,185,8,32 

,178,121,255,32,141,18,212,142,7,268,153 

,8,32,152,18,189,29368 

<AA> 3888 DATA 118,155,141,18,208,141,19 

,288,141,26,288,288,192,258,268,228,206, 

118,155,169,8,141,7,288,43605 

<KI> 3898 DATA 184,168,104,178,184,64,0, 

0,224,2,225,2,0,139,0 
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<DL> 188 REM whbhhhhhhhhhhhhhhhhhhw 
<FG> 118 REH » HASTERBLAZER * 



Computronic 



Ä 



<HJ> 12© REM * LADER FUER KASSETTE K 

<NA> 13© REM «C1907* OLIVER CYRANKA* 

<|>p> 140 REM WHtltWHHHHHH H HHHHHtWHHHI 

<HK> IS© REM 

<JI> ISO GRAPHICS A7:SETC0LGft 0,6,O:SETC 

OLOR 1,7,6! DL=PEEK C5603 + PEEK C56i**2S6 ! PO 

KE DL+13,7iTRAP 190 

<AC> 170 POSITION 4,6;? »6; "Masterbiazer 

fi 

<O0> 10© EOR 1=1536 TO 1620: READ A : POKE 

I, ft:5(JM=SUM+ CJ.-1535J*AsHEXT X : READ S 

<BB> 19© IF SOSUM THEB 1 "TIPPFEHLER IN 

DE« DATAZEILEN !":END 
<IG> ZOO POSITION 0,113? «6;" PLAV DR 



UECKEN ":K=USRC1536J 

<JF> 210 DATA 104,32,14, 6, 32, 43, 6, 32, 74, 

6,76,0,139,96,162,32,169,3,157,66,3,169, 

40,157 

<CM> 220 DATA 60,3,169,0,157,69,3,169,4, 

157,74,3,32,06,220,96,67,50,156,162,32,1 

69,7,157 

<LH> 230 DATA 66,3,169,216,157,60,3,109, 

123,157,69,3,169,159,157,72,3,169,31,157 

,73,3,32,06 

<E0> 240 DATA Z20 , 96, 162, 32, 169, 12, 157 , © 

6,3,32,06,220,96,349327 

Ende des Listings 




Kampfstern Galactica 



'Ulli!! 






mmSm 



Das Spiel zum Film 



mmmmmmm 






wmu^^umns&s^KnM^iK^m 



Wer kennt nicht den Kampfstern Galactica ? Der Film lief im Kino 
und sogar im Fernsehen. Zukunftsvisionen von feinster Güte. Hier 
erwartet Sie ein gewaltiges Science-Fiction-Abenteuer. Sie brau- 
chen schon eine geübte Hand und ein wenig Glück, um am Ende 
behaupten zu können, Sie hätten die Cylonen vernichtet 



Das Abenteuer können Sie auf eigene 
Faust oder zusammen mit einem weiteren 
Spieler bestreiten. Jedoch sei gesagt, daß 
das Spiel für beide Streiter bereits beendet 
ist, wenn einer der tapferen Krieger ver- 
nichtet wird. Vielleicht sollten Sie dann 
doch besser den Alleingang wählen, bevor 
es zu unnötigen Streitereien mit irgend- 
welchen Freunden kommt. 
Zu Spielbeginn können Sie sich dann ent- 
scheiden, ob Sie langsam oder schnell ster- 
ben wollen. Wobei die langsamere Metho- 
de angebrachter wäre, weil Sie dann doch 
eine höhere Überlebenschance haben. Das 
ganze Spektakel geht über neun Level, die 
Sie vorher einstellen können. Die abzu- 
schießenden Raumschiffe und die Zeit pas- 
sen sich dem jeweiligen Level an. Haben 
Sie im Auswanlmenü alles zu Ihrer Zufrie- 
denheit zusammengestellt und den Feuer- 
knopf gedrückt, befinden Sie sich im 
Kampfstem. Die letzten Sekunden vor 
dem Start laufen. Hauen Sie den Steuer- 
knüppel nach vorn, damit der Wettlauf mit 
der Zeit beginnen kann. 

Computronic 



P^-^> 



«v-ä&d^ ^ 




r Mist, der Flachmann ist auch alle" 



ST 



tf^ 



Sobald Sie mit Ihrem Raumgleiter einen 
Planeten berühren, befinden Sie sich auf 
demselbigen. Die Bewohner des Planeten 
haben Sie schon sehnsüchtig erwartet, da 
Sie der große Retter für die Bevölkerung 
sind. Haben Sie alle Belagerer beseitigt, 
können Sie wieder in den Weltraum 
schwirren, indem Sie den Steuerknüppel 
nach vorn bewegen. Durch SELECT kön- 



nen Sie sich eine schöpferische Pause gön- 
nen und mit START das Spiel fortsetzen. 
Zur Eingabe: 

Sie müssen lediglich die beiden Listings 
abgetippt und entsprechend auf Diskette 
abgesaved haben (DATAMAKE.l, DATA- 
MAKE. 2), um dann das Spiel mit 
RUN„D:DATAMAKE.l" zu starten. Der 
Rest geht ganz von allein. Später wird das 



Programm mit der L-Funktion des Dos ge- 
laden. 

Achtung! das Programm ist nur für Disket- 
tenbenutzer zum Abtippen, da die Umwand- 
lung auf Kassette zu kompliziert ist. Trotz- 
dem bieten wir als Service von unserem Ver- 
lag aus das Programm auf Kassette an. Also, 
Kassettenbenutzer: Abtippen nein, bestellen 
ja! 




<BM> 


3 


REH 


*e 


<JK> 


4 


REM 


» 


<EX> 


5 


REM 


* 


<EM> 


6 


REM 


* 


<EM> 


7 


REM 


» 



<AF> 1 REM WHH H HHHHHHHHHHHHHHHHHHHI 

<PO> 2 REM * Kampf Stern Calactica * 
Copyright ±986 •* 
prograHMed * 

btf * 

Carsten R«itz * 
Disketten-version * 

<AM> 8 REM KW K WmtMHKKMMHKHKKKHKKKKK 

<IF> 18 ? "*HAchtung, es seht los !!!" 

<HD> 20 ? "++KF5TERM.COM WIRD ERZEUGT." 

<MJ> 30 CL05E St3:OPEN ÖI,8,b,"DlKFSTERH . 

COM" 

<AB> 40 TRAP 6» 

<JA> SO REAO AiPUT «3,A!GOTO 50 

<AK> 60 ? "«G3LE6E >DATALI5T . 2 < EIH," :? " 

DRUECKE DANN EBEIH] ! ! ! " 

<LM> 70 XF PEEKC53279J <>6 THEN 70 

<AF> 80 TRAP 68 

<NG> 98 RUH "D:DATALI5T„2" 

<OB> lOO DATA 255,253,0,1,47,1,0,238 

<JI> 101 DATA 0,1,173,0,1,201,2,240 

<OA> 102 DATA 1,96,169,8,141,0,1,206 

<OL> 1Ö3 DATA 29,6,238,30,6,206,31,6 

<00> 104 DATA 96,0,238,27,1,173,27,1 

<EH> lOS DATA 201,4,240,1,96,169,0,141 

<0P> 106 DATA 27,1,238,36,8,96,0,140 

<AI> 107 DATA 255,145,165,204,141,0,210, 

10 

<EB> 108 DATA 141,2,210,198,205,165,205, 

281 

<BA> 1Ö9 DATA 0,203,16,230,206,230,286,1 

66 

<0A> HO DATA 206,189,0,141,133,204,189, 

1 

<HD> 111 DATA 141,133,205,165,205,24,105 

,168 

<MH> 112 DATA 141,1,210,141,3,210,165,20 

7 

<KI> 113 DATA 9,40,141,8,210,165,206,201 

<AH> 114 DATA 0,208,12,230,207,165,207,2 

Ol 

<IF> 115 DATA 6,208,4,169,0,133,207,165 

<OX> 116 DATA 205,141,197,2,141,23,208,7 

5 

<ÖH> 117 DATA 95,228,120,169,0,133,65,13 

<BG> 118 DATA 208,133,207,141,190,2,141, 

24 

<0F> 119 DATA 208,141,34,2,169,140,141,3 

5 



<PD> 120 

4 

<KF> 121 

<OA> 122 

7 

<IE> 123 

<IM> 124 

<OF> 125 

8 

<ID> 126 

<LH> 127 

<CF> 128 

57 

<IJ> 129 

,169 

<MI> ISO 

1 

<D0> 131 

281 

<XI> 132 

<LH> 133 

<NX> 134 

1 

<B0> 135 

<P8> ±36 

5 

<BC> 137 

76 

<HF> 138 

0,161 

<AG> 139 

<GI> 140 

<GJ> 141 

<GH> 142 

<FM> 143 

<FP> 144 

<GA> 145 

<GE> 146 

<HC> 147 

<HB> 148 

<MC> 149 

<GJ> 158 

<GD> 151 

<GX> 152 

<GJ> 153 

<GK> 154 

<GL> 155 

<GL> 156 

<GM> 157 

<G0> 158 

<GP> 159 

<GF> 168 



DATA 2,88,169,255,133,204,169,3 

DATA 141,200,2,141,26,208,169,1 
DATA 133, 205,162,0, ±89, 0,142, 1« 

DATA 0,156,189,0,143,157,0,157 
DATA 189,0,144,157,0,158,189,0 
DATA 145,157,0,159,232,224,0,20 

DATA 227,169,32,141,48,2,141,2 
»ATA 212,169,156,141,49,2,141,3 
DATA 212,96,162,0,189,245,140,1 

DATA 190,159,232,224,11,208,245 

DATA 3,141,15,210,173,11,212,18 

DATA 205,141,26,208,173,31,208, 

DATA 6,288,241,169,95,141,34,2 
DATA 169,228,141,35,2,169,0,141 
DATA 1,210,141,3,210,169,255,14 

DATA 68,2,169,0,141,200,2,76 
DATA 78,34,189,1,141,133,205,16 

DATA 205,24,105,167,141,1,210,1 

DATA 178,165,179,179,128,179,18 



DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



178, 
47,8 
47,8 
47,8 
40,8 
60,8 
60,8 
60,8 
47,8 
72,8 
72,8 
72,8 
60,8 
91,8 
91,8 
91,8 
72,8 
53,8 
91,8 
91,6 
91,8 
53,8 



180, 

, 29 , 

, 35 , 
, 35 , 
, 35 , 
, 35 , 
,45, 
,45, 
,45, 
, 45 , 
,53, 
,53, 

,72, 
,47, 
,53, 
, 53 , 
,53, 
,47, 



29,8, 
8,47, 
8,47, 
8,31 fl 
8,60, 
8,68, 
8,60, 
8,40, 
8 , 72 , 
0,72, 
8,72, 
8,47, 
8,91, 
8,91, 
8,91, 
8,60, 
8,64, 
8,53, 
8,91, 
8,91, 
8,91, 
8,45, 



47,8, 
8,31, 
8,31, 

8,40, 
8,48, 
8,40, 
8,45, 
8,47, 
8,47, 
8,47, 

8,66, 
8,68, 
8,68, 
8,64, 
8, 68, 
8,60, 
8,68, 
8,60, 
8,68, 
8,40, 



31,8 

8 

8 

8 

8 

8 

8 

8 

8 

8 

8 

8 

8 

8 

8 

8 

8 

8 

8 

8 

8 

8 



Computronlc 



SM 



® 



<FP> 


161 


DATA 


<FL> 


162 


DATA 


<FO> 


163 


DATA 


<FP> 


164 


DATA 


<GA> 


165 


DATA 


<GE> 


166 


DATA 


<GM> 


167 


DATA 


<GG> 


166 


DATA 


<HA> 


169 


DATA 


<GL> 


176 


DATA 


<AN> 


171 


DATA 


23 






<KA> 


172 


DATA 


3,223 




<DH> 


173 


DATA 


<GK> 


174 


DATA 


<HJ> 


175 


DATA 


<HM> 


176 


DATA 


<HM> 


177 


DATA 


<LII> 


176 


DATA 


<BA> 


179 


DATA 


<GH> 


188 


DATA 


<GI> 


181 


DATA 


<GJ> 


182 


DATA 


<GK> 


183 


DATA 


<GL> 


184 


DATA 


<FJ> 


185 


DATA 


128 






<0P> 


186 


DATA 


O 






<BK> 


187 


DATA 


<LA> 


188 


DATA 


<HA> 


189 


DATA 


<DO> 


196 


DATA 


<KK> 


191 


DATA 


<Iß> 


192 


DATA 


<GL> 


193 


DATA 


<GH> 


194 


DATA 


<ED> 


19S 


DATA 


<KP> 


196 


DATA 


<IG> 


197 


DATA 


<HA> 


198 


DATA 


<HB> 


199 


DATA 


<DG> 


280 


DATA 


<HI> 


261 


DATA 


<AO> 


282 


DATA 


<KE> 


283 


DATA 


<GE> 


264 


DATA 


<GF> 


285 


DATA 


<GG> 


286 


DATA 


<GH> 


267 


DATA 


<GX> 


268 


DATA 


<GJ> 


289 


DATA 


<GB> 


218 


DATA 


<EC> 


211 


DATA 


<HF> 


212 


DATA 


<GE> 


213 


DATA 


<GF> 


214 


DATA 


<GG> 


215 


DATA 


<GH> 


216 


DATA 


<GI> 


217 


DATA 


<GJ> 


218 


DATA 



33,8,31,8,29,8*31,8 
33,8,40,8,40,8, 60 , 8 
33,8,60,8,48,8,66,8 
33| 8/ 6B j 8j 40* 8j60j8 
33,8,60,8,46,8, 33,8 
31,8,29,8,31,8,33,8 
40,8,45,8,47,8,45,8 
40,8,33,8,31,8,29,8 
29,8,47,8,31,8,53,8 
31,8,47,8,29,6,47,8 
31,8,223,223,223,223,223,2 



DATA 223,223,223,223,223,223,22 




DATA 128,128,0,128,128,128,128, 



128,8,0,128,0,128,0,128 

128,128,128,0,0,0,0,0 

0,0,0,0,0,0,0,0 

0,0,128,0,0,0,128,0 

0,128,0,128,6,0,128,0 

128,128,8,128,0,128,0,128 

0,0,0,0,0,0,0,0 

0,0,0,0,0,0,8,0 

0,0,128,0,0,0,128,0 

128,0,0,128,0,0,128,0 

128 , 8 , 128 , 128 , O , 128 , 8 , 128 

0,0,8,0,0,6,0,0 

6,6,6,0,0,0,0,0 

0,0,128,0,8,8,128,0 

0,128,8,128,128,128,128,0 

128,0,0,128,0,128,8,128 

128 , 128 , 128 , 0,0,0,0,0 

0,0,0,0,0,0,0,0 

0,0,0,0,0,0,0,0 

0,0,0,0,0,6,0,6 

V|U|0jVf0|V|V|v 
0,0,0,0,0,0,0,0 

B| V|D|V|Bf Vf V|B 

0,0,0,0,0,0,0,0 

54,0,37,0,50,0,44,0 
33,0, 39,0,0,0,0,0 
0,0,0,0,0,0,0,8 
6,0,0,0,6,0,0,0 
0,0,0,0,0,0,0,0 
6,0, 0,0, 8,0, 0,8 
0,0,0,0,0,0,0,0 
0,0,0,0,0,0,0,0 



<GK> 

<GC> 

<GD> 

<GE> 

<GF> 

<GG> 

<GH> 

<PE> 

<JP> 

<GK> 

<GL> 

<GD> 

<GE> 

<GF> 

<GG> 

<GH> 

<GI> 

<GJ> 

<GK> 

<GL> 

<GM> 

<IB> 

<I_H> 

<8M> 

<GH> 

<GI> 

<GJ> 

<GK> 

<GL> 

<GM> 

<GN> 

<GF> 

<GG> 

<GH> 

<GI> 

<GJ> 

<BB> 

<1E> 

<LG> 

<GN> 

<G0> 

<GG> 

<GH> 

<GI> 

<GJ> 

<GK> 

<GL> 

<HP> 

<GH> 

<GO> 

<GP> 

<GH> 

<GI> 

<GJ> 

<GK> 

<GL> 

<KE> 

<HL> 



<AD> 

<GP> 

<HA> 



219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
238 
231 
232 
233 
234 
235 
236 
237 
238 
239 
240 
241 
242 
243 
244 
245 
246 
247 
248 
2*9 
250 
251 
252 
253 
254 
255 
256 
257 
258 
259 
266 
261 
262 
263 
264 
265 
266 
267 
268 
269 
278 
271 
272 
273 
274 
275 
276 



DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



Vi V/ 0f V 



0,0 



8/Bj (P jj V 



0,0,0,0,0,0, 

0,6,0,6,6,0, 
0,0,0,0,0,0, 
-0,0,0,0,0,0,0,0 
0,0,8,0,0,0,0,0 
0,0,0,0,0,0,0,0 



8, 0* O* O 



0,0,0,0,0,0,0,0 
-0,0,0,0,0,0,0,0 
0*0. 0,0 
-,_,_, J, 0,0,0,0 
0,48,50,37,51,37,46,52 
51,0,0,0,0,0,0,0 
0,0,0,0,0,0,0,0 
6,0,0,0,0,0,0,6 
0,0,0,0,0,0,0,0 

_, 0,0,0,0 

0,0,0,0,0,0,0,0 
0,0,0,0,0,0,0,0 
0,0,8,0,6,8,0,8 
0,0,0,0,6,8,0,8 
0,0,0,0,0,0,0,0 
0,0,0,0*0,0,0,0 
o # vi j 9 j Q^VjOj *»j ™ 

0,0,0,0,0,0,0,0 

0,0,0,43,33,45,48,38 
51 , 52 , 37 ,««--**-«-» - T 



(PjQjQjVVjOjCPjVfj 1 

8,0,0,0,0,0,0, 

0|0;8jVf0|VjO| 



0,0,0,6,0,0,0,0 
0,0,0,0,0 

A A a a a 



v,w,w,w,v, 0,0,0 

0,0,0,6,0,0,0, 

- - - - - 34,57,< 

v,w,w,w,v, 0,0,0 

0,0,0,0,0,0,0,0 

A » A A 1 



0,0,0,0,0 

,0,0, , _ 

V,lf,V, 0,0, 0,0,0 

0,0,0,0,0,0,0,0 

0,0,8,0,6,6,8,8 

8,8,8,8,8,6,8,8 

8,6,6,0,0,0,0,0 

0,0,0,0,0,0,0,0 

0,0,0,0,0,0,0,35 

97,114,115,116,101,1 



0,0,0,43,33,45,48,38 

51,52,37,58,46,8,8,39 

33,44,33,35,52,41,35,33 

0,0,0,0,0,0,0,0 

0,0,0,0,0,0,0,0 

0,0,0,0,0,0,0,0 

0,0,0,0,0,0,0,0 

0,0,0,8,8,6,8,6 

0,0,8,8,0,8,0,8 

8,0,6,0,0,6,0,0 

0,0,8,0,0,0,0,0 

B/B^Bf B|B| 0J0J0 

0,0,0,0,0,0,0,0 

0,0,0,0,0,0,0,0 

0,0,0,0,6,8,8,8 

8,8,0,0,0,39,50,33 

48,48,41,35,51,0,6,8 

45,53,51,41,35,51,8,8 

8,8,8,6,8,8,8,6 

6,8,8,8,8,8,8,6 

8,0,0,0,0,0,0,0 





O 

6,6 



16,8,5 



277 DATA 181,185,116,122,0,8,0,0 

278 DATA 8,6,8,8,0,0,6,8 

279 DATA 8,0,0,0,8,8,0,8 



Oomputronic 



5» 



tatf* 



<GI> 

<GJ> 

<GK> 

<GL> 

<GM> 

<GN> 

<G0> 

<GP> 

<HA> 

<HB> 

<GJ> 

<GK> 

<GL> 

<GM> 

<GN> 

<G0> 

<GP> 

<HA> 

<HB> 

<ÜP> 

<BE> 

<BK> 

<EH> 

<IK> 

<0A> 

1 

<LH> 

<AL> 

30 

<0I> 

<LM> 

<BP> 
<FI> 
<CE> 
<CB> 
<EM> 
<F0> 
<EK> 
<CG> 
<EI> 
<FL> 
<Fft> 
<BJ> 
<EE> 
<Fl> 
<FD> 
<B0> 
<EJ> 
<F0> 
<EP> 
<CD> 
<E0> 
<PD> 
<FD> 
<ON> 
<IH> 
<IB> 
<JC> 
<CI> 
<XG> 
<XJ> 
<CG> 



260 »ATA 0,0,0,0,0,8,0,« 

201 DATA 0,0,8,0,0,0,0,0 

282 DATA 0,0,0,0,0,0,0,0 

203 DATA 0,0,0,0,0,0,0,0 

284 DATA 0,0,0,0,0,0,0,0 

285 DATA 0,0,8,0,0,0,0,0 

286 DATA 0,0,0,0,0,0,0,0 

287 DATA 0,0,0,0,0,0,0,0 

288 DATA 0,0,8,0,0,0,0,0 

289 DATA 0,8,0,0,0,0,0,0 

290 DATA 0,0,0,0,O,O,G,fl 
291. DATA 8,0,0,0,0,0,0,0 

292 DATA 0,0,0,8,8,0,0,0 

293 DATA 0,0,0,0,0,0,0,0 

294 DATA 0,8,0,0,0,0,0,0 

295 DATA 0,0,0,0,0,0,0,8 

296 DATA 0,0,0,0,0,8,0,0 

297 DATA 0,0,0,0,0,0,0,0 

298 DATA 0,0,0,8,0,0,8,0 

299 DATA O, O, 226 , 2 , 227 , 2, 78, 14© 
308 DATA 285,255,0,30,255,86,0,8 . 

301 DATA 0,0,76,24,30,169,48,141 

302 DATA 40,6,238,240,6,173,240,6 

303 DATA 208,3,238,241,6,96,173,32 

304 DATA 6,201,122,208,8,169,230,14 

305 DATA 29,6,32,7,30,173,33,6 

306 DATA 201,122,208,8,169,100,141, 

307 DATA 6,32,7,30,173,34,6,281 

308 DATA 122,288,8,169,255,141,31,6 

309 DATA 32,7,30,173,40,6,201,15 

310 DATA 208,25,174,42,6,173,48,6 

311 DATA 157,8,99,169,8,141,42,6 

312 DATA 141,48,6,32,7,30,169,15 

313 DATA 141,40,6,173,49,6,201,15 

314 DATA 206,25,174,43,6,173,49,6 

315 DATA 157,0,120,169,0,141,43,6 

316 DATA 141,49,6,32,7,30,189,15 

317 DATA 141,40,6,173,50,6,201,15 

318 DATA 208,25,174,44,6,173,50,6 

319 DATA 157,0,130,189,0,141,44,6 

320 DATA 141,50,6,32,7,30,169,15 

321 DATA 141,40,6,173,51,6,201,15 

322 DATA 208,25,174,45,6,173,51,6 

323 DATA 157,0,137,169,0,141,45,6 

324 DATA 141,51,6,32,7,30,169,15 

325 DATA 141,40,6,173,52,6,201,15 

326 DATA 208,25,174,46,6,173,52,6 

327 DATA 157,0,110,169,0,141,46,6 

328 DATA 141, 52, 6, 32, 7, 30, 169, IS 

329 DATA 141,40,6,173,53,6,201,15 

330 DATA 240, 3, 76,«, 31, 174, 47, 8 

331 DATA 173,53,6,157,0,125,169,0 

332 DATA 141,47,6,141,53,6,32,7 

333 DATA 30,169,15,141,40,6,173,48 

334 DATA 6,201,155,288,5,169,9,141 

335 DATA 48,6,173,49,6,201,156,208 

336 DATA 5,169,0,141,49,6,173,50 

337 DATA 6,201,157,208,5,169,0,141 

338 DATA 50,6,173,51,6,281,158,208 

339 DATA 5,169,0,141,51,6,173,52 



<IC> 


348 


DATA 


<IG> 


341 


DATA 


<cc> 


342 


DATA 


<EH> 


343 


DATA 


<FC> 


344 


DATA 


<CE> 


345 


DATA 


<FP> 


346 


DATA 


<LH> 


347 


DATA 


<PF> 


348 


DATA 


6 






<PP> 


349 


DATA 


4 






<0D> 


350 


DATA 


2 






<OC> 


351 


DATA 


5 






<NM> 


352 


DATA 


4 






<FM> 


353 


DATA 


<LJ> 


354 


DATA 


<IE> 


355 


DATA 


,229 






<KG> 


356 


DATA 


<GF> 


357 


DATA 


<LI> 


358 


DATA 


<FL> 


3S9 


DATA 


196 






<BE> 


350 


DATA 


,5 






<HE> 


361 


DATA 


8 






<TF> 


362 


DATA 


<BH> 


363 


DATA 


55 






<IH> 


364 


DATA 


<DT> 


365 


DATA 


<FO> 


366 


DATA 


,39 






<BP> 


367 


DATA 


08 






<LI> 


368 


DATA 


5,288 




<FA> 


369 


DATA 


249 






<EL> 


370 


DATA 


281 






<KL> 


371 


DATA 


<KL> 


372 


DATA 


<FA> 


373 


DATA 


235 






<0G> 


374 


DATA 


2 






<FH> 


375 


DATA 


206 






<CH> 


376 


DATA 


12 






<FE> 


377 


DATA 


206 






<HG> 


378 


DATA 


2 






<FI> 


379 


DATA 


165 







6,201,159,208,5,169,8,141 

52,6,173,53,6,281,157,288 

S, 169, 0,141,53,6, 173,16 

6 , 201 ,15,208,5, 169, , 141 

16,6,173,17,6,261,15,208 

5,169,0,141,17,6,162,35 

254,0,77,189,0,77,201,25 

206,10,169,16,157,8,77,202 

224,29,288,236,162,8,169,1 

157,13,77,157,53,77,232,22 

6,208,245,173,240,6,133,11 

173,255,5,133,113,168,0,16 

112,201,8,240,27,162,55,25 

0,77,189,0,77,201,26,208 

10,169,16,157,0,77,202,224 

52,208,236,200,196,112,200 

168,0,165,113,201,0,240,27 
162,15,254,0,77,189,0,77 
201,26,208, 18, 169, 16, 157,0 
77, 202 , 224, 29, 208, 236, 200, 

113, 208, 229, 173 , 31, 208, 281 

208,20,173,11,212,201,1,2» 

6,173,244,2,141,9,212,173 
31,208,201,6,208,235,173,2 

5,237,240,6,176,6,173,248 
6,141, 255 ,5, 96, 88, 169, O 
133,116,169,87,133,117,160 

169,0,145,116,200,192,43,2 

249,230,117,165,117,201,14 

237,173,11,212,201,15,208, 

169,100,133,208,173,4,179, 

6,240,26,173,11,212,24,105 
63, 10, 10,41,243, 141, 26, 208 
198,206,165,286,201,0,208, 

169,0,141,26,208,173,11,21 

201,57,208,249,169,30,133, 

159,96,141,26,288,173,11,2 

201,61,208,249,169,30,133, 

173, 11, 212, 24, 101 , 20 , 141,2 

208,10,141,24,208,198,206, 



60 



Computronic 



tfM 



<0F> 


380 


DATA 286,281,8,288,235,173,196, 


<HE> 


422 


DATA 


218,169,1,141,6,218,162,8 


2 






<CG> 


423 


DATA 


169,6,157,8,64,157,8,65 


<0J> 


381 


DATA 141,22,288,173,198,2,141,2 


<LE> 


424 


DATA 


232,224,255,288,245,162,21 


4 






8,163 








<EN> 


382 


DATA 288,173,11,212,281,73,288, 


<EP> 


425 


DATA 


92,157,8,64,24,185,1,232 


243 






<KP> 


426 


DATA 


224,218,288,245,162,218,16 


<XI> 


303 


DATA ±69,168,133,286,173,49,179 


9, 180 


t 






,261 






<HP> 


427 


DATA 


157,0,65*24,165,1,232,224 


<HP> 


384 


DATA 51,248,26,173,11,212,24,18 


<CB> 

65 

<BB> 


428 


DATA 


218,288,245,169,0,133,28,1 


5 
<KM> 


385 


DATA 78,16,18,41*243,141,26,288 


429 


DATA 


28,141,154,33,141,157,33,2 


<FE> 


386 


DATA 198,286,185,286,281,6,288, 


01 








235 






<TA> 


438 


DATA 


193,268,244,165,28,208,252 


<FJ> 


387 


DATA 169,8,141,26,268,173,6,6 


j X (>jt! 








<FJ> 


388 


DATA 261,1,288,3,76,36,33,173, 


<OM> 


431 


DATA 


209 , 169 , IAO , 157 ,0,64,24,16 


<MA> 


389 


DATA 1,6,201,1,288,3,76,36 


5 








<«L> 


390 


DATA 33,173,162,173,18,234,18,1 


<EM> 


432 


DATA 


1,232,224,213,288,245,162, 









289 








<OC> 


391 


DATA 24,234,234,141,136,6,173,3 


<IH> 


433 


DATA 


169,118,157,8,65,24,185,1 


1 






<EJ> 


434 


DATA 


232,224,219,289,245,162,8, 


<ZH> 


352 


DATA 77,32,141,33,288,3,76,118 


142 








<IJ> 


393 


DATA 33,173,246,6,281,69,208,3 


<Hft> 


435 


DATA 


6,210,232,142,2,210,163,0 


<0«> 


394 


DATA 76,162,33,173,248,6,265,13 


<NC> 

1 

<MO> 


436 


DATA 


133,28,155,20,141,1,218,14 


ö 
<AK> 


395 


DATA 6,268,3/76,79,33,76,35 


437 


DATA 


3,218,281,17,288,244,32,25 


<IG> 


396 


DATA 32,169,8,141,8,208,32,129 


1 








<MF> 


397 


DATA 33,169,98,141,36,2,189,228 


<PB> 


438 


DATA 


32,76,165,173,169,8,133,11 


<L0> 


338 


DATA 141,37,2,169,64,141,14,212 


2 








<PK> 


399 


DATA 169,156,141,244,2,162,8,16 


<1G> 
,168 
<HF> 


439 


DATA 


133,114,169,35,133,113,169 

* 


9 

<HE> 


488 


DATA 8,157,8,218,232,224,9,288 


448 


DATA 


133,115,173,1,211,9,2,141 


<cr> 


481 


DATA 248,96,32,251,32,169,247,1 


<NG> 

4 
<DM> 


441 


DATA 


1,211,168,8,177,112,145,11 


41 
<LA> 


462 


DATA 48,2,141,2,212,163,162,141 


442 


DATA 


286,192,6,268,247,236,113, 


<EK> 


403 


DATA 49,2,141,3,212,169,1,133 


230 








<JF> 


484 


DATA 28,173,11,212,24,181,28,16 


<ID> 


443 


DATA 


115,165,115,201,192,288,23 


<JH> 


405 


DATA 18,141,22,208,165,20,281,8 


5,76 








<CP> 


486 


DATA 288,239,76,165,173,162,8,1 


<MA> 


444 


DATA 


165,173,132,247,185,247,14 


89 






1,245 






<LI> 


487 


DATA 186,33,157,48,77,232,224,4 


<J1> 


445 


DATA 


154,245,218,197,221,197,53 


<0H> 


488 


DATA 288,245,169,1,133,26,166,2 


,194 








O 






<GH> 


446 


DATA 


38,244,187,248,82,248,160, 


<CE> 


489 


DATA 288,252,32,251,32,76,165,1 


197 








73 






<HO 


447 


DATA 


198,197,281,197,195,197,28 


<JC> 


418 


DATA 39,47,47,36,162,8,189,126 


4,197 






<l_D> 


411 


DATA 33,157,28,77,232,224,3,268 


<LM> 


448 


DATA 


162,228,116,251,179,248,13 


<I6> 


412 


DATA 245,76,92,33,47,53,52,141 


8,248 






<HH> 


413 


DATA 1,268,169,238,133,28,165,2 


<FH> 

,36 

<MH> 


449 


DATA 


186,248,46,194,146,243,163 


<EL> 


414 


DATA 288,252,96,24,185,248,285, 


456 


DATA 


228, 51, 8, 192, 64, 192, 88, 255 


±62 






<CJ> 


451 


DATA 


55,252,116,53,119,53,175,2 


<EE> 


415 


DATA 173,96,112,112,112,112,112 


48 








,6» 






<FL> 


452 


DATA 


163,36,155,245,288,253,63, 


<PK> 


416 


DATA 8,64,68,8,65,65,148,33 


255 








<LM> 


417 


DATA 32,251,32,169,148,141,48,2 


<GF> 


453 


DATA 


217,193,128,222,24,198,27, 


<XD> 


418 


DATA 141,2,212,169,33,141,49,2 


198 








<OE> 


419 


DATA 141,3,212,169,1S2,141,244, 


<GL> 


454 


DATA 


8,8,6,8,8,8,6,8 


2 






<GM> 


455 


DATA 


8,8, 6,8, 8, 8, 6, 8 


<MH> 


428 


DATA 162,248,142,8,216,232,142, 


<GM> 


456 


DATA 


8,8,8,8,8,6^8,8 


2 






<GO> 


457 


DATA 


8,6,8,8,8,8,6,0 


<HI> 


421 


DATA 218,169,175,141,1,216,141, 


<GP> 


458 


DATA 


8,0,0,6,6,8,8,8 


3 






<HA> 


459 


DATA 


8,8,8,8,8,8,8,8 



ComputroniG 
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.ßtffr 



<AA> 468 

<0H> 461 

9 

<JC> 462 

<H0> 463 

O 

<BK> 464 

98 

<BP> 465 

60 

<KP> 466 

<GA> 467 

,74 

<BP> 468 

06 

<PK> 469 

4 

<Ü0> 470 

7 

<AH> 471 

66 

<ME> 472 

<IÖ> 473 

,252 

<BG> 474 

76 

<FH> 475 

177 

<AI> 476 

OS 

<IF> 477 

<LP> 478 

8,238 

<EI> 479 

112 

<AM> 488 

28 

<IG> 481 

,163 

<LH> 462 

8,254 

<DP> 483 

141 

<BD> 484 

33 

<TP> 485 

,164 

<1_K> 486 

5,168 

<ÖC> 487 

6 

<HH> 488 

,112 

<JH> 489 

,169 

<H1> 498 

<0L> 431 

8 

<CF> 492 

86 

<D0> 493 



DATA 8,8,0,8,8,0,126,32 

DATA 231,168,169,16,141,34,2,16 

DATA 168,141,35,2,88,96,24,165 
DATA 284,74,74,185,168,141,1,21 

DATA 165,204,288,3,32,186,160,1 

DATA 204,24,165,285,74,74,105,1 

DATA 141,3,210,165,265,288,3,32 
DATA 138,160,198,20S,24,155,286 

DATA 74,105,192,141,5,218,165,2 

DATA 208,3,32,169,168,198,206,2 

DATA 165,287,74,74,105,160,141, 

DATA 210,165,207,208,3,32,208.1 

DATA 198,287,169,0,141,8,218,76 
DATA 95,228,169,161,133,113,173 

DATA 160,133,112,201,127,208,3, 

DATA 245,164,238,252,168,160,0, 

DATA 112,141,0,210,24,165,112,1 

DATA 128,133,112,177,112,133,28 

DATA 169,162,133,113,173,253,16 

DATA 253,160,133,112,168,0,177, 

DATA 141,2,210,24,165,112,185,1 

DATA 133,112,177,112,133,285,96 

DATA 163,133,113,173,254,160,23 

DATA 180,133,112,168,8,177,112, 

DATA 4,218,24,165,112,105,128,1 

DATA 112,177,112,133,206,96,169 

DATA 133,113,173,255,160,238,25 

DATA 133,112,160,0,177,112,141, 

DATA 210,24,165,112,165,128,133 

DATA 177,112,133,207,96,162,252 

DATA 0,157,0,160,232,224,0,288 
DATA 248,157,204,0,232,224,5,20 

DATA 248,96,127,126,125,115,0,1 

DATA 85,85,72,64,72,72,53,72 



72,85,85,96,188,96,85,81 

81,85,85,96,98,72,72,72 

81,81,81,81,81,68,68,72 

68,60,72,68,68,53,53,0 

0,47,0,0,0,40,53,53 

65,26,0,0,42,42,0,47 

60,60,64,72,64,64,64,53 

53,42,42,47,53,81,72,64 

68,53,40,42,47,53,42,42 

33,31,33,33,26,33,33,42 

42,47,53,47,53,47,42,47 

53,47,64,57,53,72,81,72 

85,81,72,96,108,96,114,108 

96,85,85,8,0,0,0,0 

0,0,0,8,0,8,1,16 

16,18,16,16,16,32,16,16 

16,16,16,8,8,24,8,16 

JL6 | jL&# 16| 32^ 32 * JL f> j 16| lo 

16 j AG ß J.6 j X6| Jlö ß JLS j Idj A6 

16,16,16,24,8,16,16,24 

8,16,16,16,16,16,16,16 

16,16,16,16,16,16,16,16 

16,16,8,8,16,16,16,16 

16,16,16,16,16,16,16,16 

16,16,32,24,8,16,16,16 

16,16,16,32,16,16,16,18 

16,8,8,16,8,8,16,8 

8,16,8,8,16,8,8,16 

8,8,16,8,8,16,16,32 

32 , 64 , 64 , 16 , 16 , £6 , 16 , 16 

16,16,16,16,16,0,0,144 

108,108,85,128,114,100,96, 



526 DATA 188,0,188,114,128,114,102, 

527 DATA 96,108,108,108,114,188,96, 

81,108,102,85,85,96,108,96 

182,85,96,96,121,81,91,96 

168,8,108,0,91,64,57,53 

81,57,53,47,42,81,64,64 

64,53,33,33,72,72,47,58 

47,96,96,81,85,81,96,81 

54,85,72,72,76,85,82,188 

65,72,76,81,84,60,72,53 

53,42,42,42,42,31,42,42 

53,53,36,64,168,53,57,64 

57,81,72,64,85,96,85,108 

96,85,114,128,114,115,128, 

108 ,108,0,6,0,0,1,16 

16,16,16,16,16,16,16,32 

16,16,16,8,8,24,8,16 

15,16,16,16,16,8,8,8 

8,16,12,4,16,8,8,16 

8,8,16,16,16,16,16,16 

18,16,24,6,16,16,24,8 

16,16,16,8,8,16,16,16 

16,16,16,16,16,16,8,8 

16,16*, 16, 8, 8, 16; 16, 16 

16,16,16,16,16,16,16,16 

16,16,16,32,16,16,16,16 



<HP> 


494 


DATA 


<EM> 


495 


DATA 


<ED> 


496 


DATA 


<AD> 


497 


DATA 


<FC> 


498 


DATA 


<I0> 


499 


DATA 


<CI> 


500 


DATA 


<CH> 


501 


DATA 


<BM> 


582 


DATA 


<BG> 


503 


DATA 


<CP> 


504 


DATA 


<DE> 


505 


DATA 


<HO> 


506 


DATA 


<CD> 


507 


DATA 


<KD> 


508 


DATA 


<CC> 


589 


DATA 


<IO> 


518 


DATA 


<BJ> 


511 


DATA 


<B0> 


512 


DATA 


<oo> 


513 


DATA 


<P8> 


514 


DATA 


<CB> 


515 


DATA 


<ME> 


516 


DATA 


<CD> 


517 


DATA 


<PC> 


518 


DATA 


<CD> 


519 


DATA 


<DC> 


520 


DATA 


<DD> 


521 


DATA 


<GB> 


522 


DATA 


<CE> 


523 


DATA 


<OF> 


524 


DATA 


<CP> 


525 


DATA 


85 






<BC> 


526 


DATA 


96 






<DB> 


527 


DATA 


85 






<HD> 


528 


DATA 


<KC> 


529 


DATA 


<CA> 


538 


DATA 


<DC> 


531 


DATA 


<CI> 


532 


DATA 


<EJ> 


533 


DATA 


<GP> 


534 


DATA 


<DX> 


535 


DATA 


<BH> 


536 


DATA 


<GH> 


537 


DATA 


<HT> 


538 


DATA 


<FH> 


539 


DATA 


168 






<HB> 


540 


DATA 


<B6> 


541 


DATA 


<JD> 


S42 


DATA 


<JF> 


543 


DATA 


<FP> 


544 


DATA 


<MG> 


545 


DATA 


<HF> 


546 


DATA 


<MI> 


S47 


DATA 


<HJ> 


548 


DATA 


<MK> 


549 


DATA 


<CA> 


550 


DATA 


<BP> 


5S1 


DATA 






Computronic 



® 



ß^ 



DATA 108, 96, 85, 72,72,53,53,53 

DATA 53,42,53,53,72,72,97,76 

DATA 109,81,58,65,58,82,73,81 

DATA 86,37,86,165,37, 108,115,12 

DATA 115, 116,162, 128,144,14*,©, 

DATA 6,6,6,8,6,6,6,8 

DATA 0,6,6,8,6,6,1,32 

DATA 32,16,16,16,16,64,48,16 

DATA 16,16,16,16,16,8,8,16 

DATA 16,16,16,32,16,16,16,16 

DATA 16,16,16,16,18,16,16,16 

DATA 16,16,8,8,8,8,16,16 

DATA 8,8,6,8,32,32,16,8 

DATA 8,16,16,16,8,8,16,16 

DATA 16,8,8,16,16,32,32,32 

DATA 16,16,16,16,16,16,16,18 

DATA 16,16,16,16,16,16,16,18 

DATA 32,16,16,16,16,16,16,16 

DATA 16,16,8,8,16,8,6,16 

DATA 8,8,16,8,8,15,8,8 

DATA 16,16,32,32,64,64,64,64 

DATA 64,64,64,169,95,141,34,2 

DATA ±69,228,141,35,2,96,8,0 

DATA 8,8,6,0,8,8,6,8 

DATA 8,8,32,8,0,8,0,0 

DATA 0,40,40,8,0,0,8,0 

DATA 1,5,23,22,87,92,0,0 

DATA 192,240,262,124,127,95,9«, 

DATA 23,21,5,1,6,8,95,127 

DATA 124,252,240,192,0,0,0,0 

DATA 3,15,63,63,240,255,0,0 

DATA 192,240,252,252,255,207,25 

DATA 63,60,15, 3,0, O, 2S6,2S5 
DATA 252,252,240,192,0,0,0,1 
DATA 5,5,21,22,90,90,0,64 
DATA 80,96,168,152,30,170,90,86 
DATA 21, 21,5, 5, ±,0,166,186 
DATA 104,168,160,160,129,0,0,25 



DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



<CA> 552 

<MF> 553 

<DJ> 554 

<JE> 5S5 

<MG> 556 

<0G> 557 

87 

<FF> 558 

116 

<JE> 559 

,137 

<EL> 568 

122 

<TJ> 561 

6,38 

<CA> 562 

55 

<IC> 563 

.116 

<CG> 564 

30 

<FP> 565 

206 

<GF> 566 

176 

<FK> 567 

<MB> S68 

<JE> 569 

<IO> 578 

<IL> 571 

<PB> 572 

<CF> 573 

<MG> 574 

<MH> 575 

<GM> 576 

<AP> 577 

<Dft> 578 

<CH> 579 

<DJ> 586 

<HO> 581 

<KM> 582 

<HI> 583 

<IP> 584 

<JA> 585 

<J8> 586 

<JC> 587 

<PG> 588 

<FH> 589 

4,8 

<0I> 590 

3 

<LD> 591 

2, ±28 

<HH> 592 

<FD> 533 

162 

<FM> 534 

,72 

<HO> 535 

<B0> 536 

<FF> 537 

121 



DATA 16,16,16,16,32,16,16,16 
DATA 16,16,16,16,16,16,8,8 
DATA ±6,8,8,16,8,8,16,8 
DATA 8,16,8,8,16,16,32,32 
DATA 64,64,128,128,128,8,14,176 
DATA 176,176,137,238,93,103,33, 

DATA 230,206,236,87,93,137,131, 

206,155,103,197,37,146,131 

33,87,131,116,131,245,230, 

±16,101,116,218,206,155,17 

131,93,14,155,87,206,101,1 

206,176,238,116,137,146,14 

176,92,95,98,101,101,116,2 

230,87,206,206,176,87,266, 

176,118,93,33,230,230,170, 



DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



137 , 118 ,1,2,3,4,5,6 

2,4,6,6,18,4,2,5 

6,8,5,2,4,6, 2, ± 

2,3,4,6,6,7,8,1 

2,3,4,5,6,2,4,6 

8,10,4,2,5,6,1,64 

64,32,32,48,16,32,32,16 

16,16,8,8,16,16,32,16 

16,32,16,16,16,8,8,16 

16 , 16 , 8 , 8 , 16 , 16 , 8 , 8 

8,8,16,16,0,8,8,8 

64,64,64,48,16,32,32,32 

16,16,16,16,16,16,32,32 

64,46,16,64,48,16,64,64 

64 ,8,8,8,8,8,8,8 

8,8,8,8,8,8,8,8 

8,64,4,4,4,4,4,4 

4,4*4,4,4,4,4,4 

4,4,4,4,4,4,4,4 

4,4,4,4,4,4,4,4 

4,4,4,4,4,4,4,4 

4,4,4,4,4,4,8,173 

144,162,182,173,162,144,14 



DATA 128,0, 144,8, 128,144,162^17 

DATA 173,173,121,123,121,144,16 

DATA 8,0,0,0,144,0,0,0 

DATA 128, ±93,0, 153, 144,128,114, 

DATA 173,193,217,121,128,188,64 

DATA 81,72,85,121,96,102,96,144 

DATA 0,128,144,128,193,0,0,0 

DATA 153,0,173,144,173,128,128, 



<MD> 598 
<EC> 599 
<GJ> 680 
<AH> 601 
9 

<HL> 662 
O 

<GH> 603 
<JO> 604 
<CH> 605 
<ME> 606 
<CB> 687 
<CE> 608 
<GJ> 609 
<C0> 610 
<JB> 611 
<LL> 612 
<CA> 613 
<CB> 614 
<CA> 615 
<GH> 616 
<AK> 817 
<CH> 6±8 
<GJ> 619 
<CB> 620 
<GH> 621 
<JM> 622 
<HB> 623 
<FD> 624 
<DA> 625 
85 

<IC> 626 
<AP> 627 
<OL> 628 
<MA> 629 
5,255 
<OH> 638 
<AH> 631 
<XG> 632 
<MA> 633 
<LA> 634 
<0E> 635 
3 

<NL> 636 
<FD> 637 
<LD> 638 
<BE> 639 
<OB> 640 
<EB> 641 
<BF> 642 
<K1> 643 
<H0> 644 
<FA> 645 
<AO> 646 
<t_C> 647 
<FK> 648 
<LM> 649 
<HH> 650 
<KG> 651 
<BD> 652 
<AN> 653 
<LE> 654 




17,2±,±,1,2±,8,0,8 

4,0,0,4,0,0,0,29 

127,63,127,29,0,0,53,253 

55,23,55,253,53,0,0,0 

20,253,253,20,0,0,0,60 

214,252,252,214,60,0,0,240 

60,245,245,60,240,0,0,0 

40,0,0,40,0,0,0,63 

51,51,63,51,51,0,0,60 



Computronic 



IflM 



<LC> 


6S5 


DATA 


51,60,51,51, 68, 8,8, 68 


<AA> 


789 


DATA 


255,255,191,255,255,0,85,8 


<LP> 


656 


DATA 


51,48,48,51,68,0,0,60 


4 








<LH> 


657 


DATA 


51,51,51,51,68,8,0,63 


<M0> 


710 


DATA 


84,85,84,85,0,0,85,63 


<MH> 


656 


DATA 


48,68,48,48,63,8,8,63 


<HH> 


711 


DATA 


105,221,255,85,8,0,84,213 


<HB> 


659 


DATA 


48,60,48,48,48,8,0,63 


<BH> 


712 


DATA 


85,1,85,64,0,0,0,0 


<LL> 


660 


DATA 


48,60,55,51,63,0,0,51 


<LB> 


713 


DATA 


5,5,1,0,0,0,0,85 


<Lr> 


661 


DATA 


51,61,63,51,51,0,0,63 


<ID> 


714 


DATA 


4,81,84,21,1,0,21,81 


<HE> 


662 


DATA 


12,12,12,12,63,0,0,3 


<BC> 


715 


DATA 


84,4,81,68,85,85,85,81 


<BF> 


663 


DATA 


■*r f w f w § O JL j l/f V ß V j »>jL 


<BG> 


716 


DATA 


68 , 69 , 81 , 4 , 81 , 86 , 85 , 85 


<LI> 


664 


DATA 


51, 60, 60, Sl, 51,0,0,48 


<EN> 


717 


DATA 


68,81,84,68,81,85,84,05 


<AH> 


665 


DATA 


48,48,48,48,63,8,8,195 


<PM> 


718 


DATA 


81 , 20 , 81 , 68 f 21 , 85 , 8 , 85 


<AA> 


666 


DATA 


255, 215, 195,195, 195, 0,0« 19 


<JB> 


719 


DATA 


65,28,69,84,64,8,0,0 


5 








<B0> 


728 


DATA 


80,88,64,8,0,0,0,0 


<MD> 


667 


DATA 


243,255,255,207,195,0,0,63 


<HE> 


721 


DATA 


0,1,5,5,0,0,0,1 


<LJ> 


666 


DATA 


51, 51,61,51,63, 0,0,60 


<CJ> 


722 


DATA 


21,81,65,84,85,0,111,85 


<MG> 


669 


DATA 


51,51,60,48,48,0,0,83 


<GE> 


723 


DATA 


69,81,17,69,80,21,111,85 


<I_E> 


670 


DATA 


51,51,51,55,61,0,0,60 


<GG> 


724 


DATA 


17,71,23,19,69,85,111,85 


<LA> 


671 


DATA 


51,51,68,51,51,0,0,16 


<PM> 


725 


DATA 


81,245,244,241,68,85,111,8 


<FB> 


672 


DATA 


48, 12,3,3,60,0,0,63 


5 








<KD> 


673 


DATA 


12,12,12,12,12,0,0,51 


<AD> 


726 


DATA 


68,21,88,69,17,84,0,64 


<LG> 


574 


DATA 


51,51,51,51, 63,0,0,51 


<I1> 


727 


DATA 


84,21,65,21,85,6,0,0 


<0K> 


675 


DATA 


81, 51, 51,51,12,0,0, 195 


<BJ> 


728 


DATA 


0,54,80,80,0,0,0,0 


<MI> 


676 


DATA 


195,195,215,255,195,0,0,51 


<DL> 


729 


DATA 


2,9,39,159,159,159,2,41 


<LA> 


677 


DATA 


51,12,12,51,51,0,0,51 


<LL> 


730 


DATA 


151, 127, 255, 255, 255, 255, 12 


<I_B> 


678 


DATA 


51,51,12,12,12,0,0,63 


8,106 






<FC> 


679 


DATA 


3,12,12,48,63,0,0,0 


<CH> 


731 


DATA 


85,213, 255 , 255 , 255 , 255 ,0,1 


<0G> 


680 


DATA 


8,8,85,85, 8,8,0,8 


28 






■ 


<PB> 


681 


DATA 


15,255,85,85,170,0,0,0 


<i_F> 


732 


DATA 


104,86,213,253,255,255,0,0 


<JF> 


682 


DATA 


245,245,85,98,98,10,5,165 


<CH> 


733 


DATA 


0,128,96,88,214,245,0,0 


<GA> 


683 


DATA 


165,165,165,85,80,80,0,0 


<KA> 


734 


DATA 


0,0,0,0,2, 11, 0,0 


<EM> 


684 


DATA 


0,191,173,233,62,0,0,250 


<LG> 


735 


DATA 


O, 8,18, 165, 96, 256,0,2 


<CE> 


685 


DATA 


255,255,258,250,234,168,0, 


<HF> 


736 


DATA 


9,165,87,95,255,255,10,165 


BS 








<AF> 


737 


DATA 


85 , 95, 255, 256, 255, 255, 0, 12 


<JI> 


686 


DATA 


193, 24S, 69, 80, 82, 16, 0,165 


8 








<MH> 


687 


DATA 


37,101 ,85,05,80,0,2.9 


<HJ> 


738 


DATA 


96,88,214,214,246,246,11,2 


<DJ> 


688 


DATA 


37,167,159,157,166,40,168, 


<BM> 


739 


DATA 


0,0,0,0,0,8,255,87 


90 








<LB> 


740 


DATA 


169,2,0,0,0,8,250,253 


<EA> 


689 


DATA 


245 , 255 , 253 , 246 , 88 , 160 ,9,1 


<BJ> 


741 


DATA 


85,90,160,8,0,8,255,213 


67 








<ME> 


742 


DATA 


86,168,0,0,0,0,246,88 


<AF> 


698 


DATA 


95,255,255,95,165,10,160,0 


<BI> 


743 


DATA 


160,0,8,0,0,8,39,9 


Ö 








<EF> 


744 


DATA 


2,0,0,0,0,0,255,127 


<LM> 


691 


DATA 


246,253,253,253,126,170,15 


<ÖI> 


745 


DATA 


149,42,8,8,0,0,255,253 


2,182 






<MB> 


746 


DATA 


86,168,0,0,0,0,255,90 


<ÖH> 


692 


DATA 


118,125,118,125,189,170,0, 


<KK> 


747 


DATA 


166 , ö , , , , 8 , 224 ,U28 











<HB> 


748 


DATA 


0,8,8,8,0,0,0,0 


<EA> 


693 


DATA 


0,0,13,13,121,13,0,0 


<DK> 


749 


DATA 


8,8,0,0,8,8,112,112 


<SK> 


694 


DATA 


21, 127, 186, 87, ü?, 119, 8,8 


<LD> 


750 


DATA 


124,119,119,124,112,0,7,55 


<LG> 


695 


DATA 


84,119,170,221,119,221,0,0 


<HP> 


751 


DATA 


124,192,0,124,55,0,8,0 


<JI> 


696 


DATA 


0,64,64,64,84,85,0,8 


<HE> 


752 


DATA 


119,115,112,124,119,0,8,0 


<0J> 


697 


DATA 


8^0,8,8, 88, 85, 0,0 


<GH> 


753 


DATA 


112,112,112,119,125,0,0,0 


<0K> 


698 


DATA 


8,0,8,8 ,80,85, 0,0 


<HC> 


754 


DATA 


113,119,116, 116,112,0,0,0 


<LI> 


699 


DATA 


0,0,0,0,5,85,0,0 


<0F> 


755 


DATA 


20,244,116,119,7,0,0,0 


<JP> 


788 


DATA 


0,0,0,0,0, 64, 0,8 


<BC> 


756 


DATA 


119,115,112,124,119,112,0, 


<JJ> 


781 


DATA 


6,0,0,0,8, 21, 0,0 


68 








<AJ> 


782 


DATA 


0,0,0,0,0,64,13,13 


<HF> 


757 


DATA 


126,102,102,126,60,0,0,60 


<HC> 


783 


DATA 


13,0,0,8,0,0,119,119 


<IO> 


758 


DATA 


126,126,126,126,60,0,0,99 


<HP> 


784 


DATA 


117,85,0,0,8,0,221,119 


<DL> 


7S9 


DATA 


54,28,127,28,54,99,0,24 


<IJ> 


7©5 


DATA 


221,87,5,1,8,8,85,80 


<NP> 


760 


DATA 


24,126,126,24,24,0,0,0 


<MH> 


786 


DATA 


255,255,235,255,63,8,85,88 


<EK> 


761 


DATA 


8,0,24,24,24,48,0,0 


<PI> 


787 


DATA 


255,255,258,255,255,0,85,8 


<NJ) 


762 


DATA 


0, 60 ; 60, 0,0, 8, 8,8 


e 








<EM> 


763 


DATA 


0,0,0,48,120,48,0,3 


<HK> 


788 


DATA 


255,255,254,255,255,0,85,5 


<PL> 


764 


DATA 


7, 14, 28, 56, 112, 96, 0,62 



64 



Compulronic 



AM 



<GM> 

<BE> 

<JM> 

<0B> 

<LK> 

<FJ> 

<BÖ> 

26 

<PI> 

<DO> 

124 

<ID> 

<CK> 

<XG> 

<FK> 

<CG> 

92 

<OP> 

<0F> 

2 

<GA> 

<CP> 

99 

<LB> 

<LH> 

<JP> 

<BA> 

9 

<oe> 

<IE> 
<MK> 
<LH> 
<Ct> 
<LH> 



765 DATA ±03,99,95,99,115,62,8,12 

766 DATA 28,66,12,12,12,12,8,124 

767 DATA 198,12,24,48,96,254,8,126 

768 DATA 12,24,12,6,182,68,8,12 

769 DATA 28,68,188,284,254,12,8,126 
778 DATA 96,96,126,6,182,66,8,124 

771 DATA 198,192,252,286,182,60,8,1 

772 DATA 6 , 12 , 24, *8, 48 , 48, 6, 124 

773 DATA 266,236,124,286,238,124,6, 

774 DATA 286,238,126,6,14,124,0,56 

775 DATA 188,56,8,56,188,56,8,24 

776 DATA 68,24,8,24,24,48,8,8 

777 DATA 88,209,23,28,86,8,29,127 

778 DATA 115,31,223,228,28,28,192,1 

779 DATA 221,31,28,28,248,8,8,7 
788 DATA 193,127,61,29,124,0,112,11 

781 DATA 95,93,64,112,288,8,28,60 

782 DATA 54, 62 , 102 , 182 , 195, 19S , 126, 

783 DATA 99,110,99,99,99,62,62,115 

784 DATA 96,96,96,96,115,62,126,99 

785 DATA 99,99,99,99,99,126,62,99 

786 DATA 188,124,108,96,99,62,126,9 

787 DATA 188,124,108,96,96,96,62,99 

788 DATA 96,96,118,99,51,30,99,99 

789 DATA 99,183,12 7,115,99,99,38,24 
798 DATA 24,24,24,24,24,14,6,6 

791 DATA 6,6,6,102,76,56,102,108 

792 DATA 188,128,120,188,108,182,96 



♦ ♦♦ Tfeil2 ♦♦♦ 



<ÄG> 5 REM ** MIT DATALIST . 2 SPEICHERN * 

* 

<JL> 18 TRAP 28JCL85E »3SOPEN «3,9,©,"D: 

KFSTERN .COM" 

<PH> 20 TRAP 48 

<IM> 38 READ A : PUT tt3,A;GOTO 30 

<BC> 40 CLOSE tt3;KIO 35, «1, O, O, "D : KFSTER 

N . COM" 

<IJ> SO ? "«+*** ►the ertd4+*" 

<DM> 60 EHD 

<JII> 76 DATA 96,96,96,96,102,126,120,34 

<0D> 80 DATA 119,127,107,107,99,99,99,99 

<MJ> 98 DATA 99,115,123,111,183,99,99,62 

<LB> lOO DATA 99,99,99,99,99,115,62,126 

<CK> 118 DATA 51,51,51,54,48,48,96,52 

<PO> 120 DATA 115,99,99,99,111,110,59,23 

8 

<EC> 138 DATA 115,182,188,182,182,99,195 

,60 

<IK> 140 DATA 99,112,68,14,6,78,124,127 

<GA> ISO DATA 24,48,96,64,97,63,30,230 

<FO> 160 DATA 182,182,102,102,102,110,63 

,195 

<AD> 170 DATA 102,102,102,182,102,60,24, 

99 



<DE> 188 

93 

<CG> 190 

98 

<PJ> 200 

26 

<LK> 210 

<BB> 220 

<IJ> 230 

<DG> 240 

<LA> 250 

<EF> 260 

<M«> 278 

<BB> 288 

92 

<HE> 298 

<EB> 300 

<JK> 310 

<EH> 320 

<00> 330 

<EH> 348 

<IB> 358 

<LF> 360 

3,255 

<A8> 378 

5 

<MG> 388 

<LL> 396 
5,171 

<IL> 4O0 
,170 

<FC> 410 
247 

<FA> 420 
3,9 

<OA> 430 

<EE> 440 
,21 

<HO> 450 

<ND> 460 

<AL> 470 

<GB> 480 

<BC> 490 

<NP> 508 

<BC> 518 

<PA> 528 

<CF> 530 

<F0> 540 

<DC> 550 

<LH> 560 

<CP> 578 

<PH> 588 

<AF> 596 

<AB> 600 

<CF> 610 

<EG> 620 

<EH> 630 

<EI> 640 

<EJ> 656 



DATA 99,99,107,107,127,119,34,1 

DATA 227,118,60,60,62,103,195,1 

DATA 102,102,102,62,60,24,120,1 

DATA 198,12,120,62,96,195,254,0 
DATA 0,213,92,87,112,119,0,0 
DATA 0,65,69,77,7,124,0,0 
DATA 8,113,215,223,220,28,8,0 
DATA 0,221,85,23,28,28,8,8 
DATA 0,112,88,92,223,23,8,255 
DATA 0,0,0,0,0,0,0,213 
DATA 127,112,117,119,112,215,8, 

DATA 212,0,92,212,213,84,0,220 
DATA 71,71,220,28,119,205,0,0 
DATA 0,215,119,112,112,213,0,52 
DATA 52,85,247,52,221,115,8,8 
DATA 28,8,28,23,215,93,8,65 
DATA 85,85,85,85,85,85,85,85 
DATA 95,95,95,95,95,96,85,255 
DATA 255,253,253,245,245,213,21 

DATA 255,127,127,95,95,87,87,25 

DATA 255, 255, 255, 255, 255, 255, 2S 

DATA 234,250,245,253,254,255,25 

DATA 171,175,95,127,191,255,255 

DATA 170,170,85,85,170,170,170, 

DATA 223,247,223,247,223,247,22 

DATA 41,41,45,41,45,41,41,0 
DATA 80,208,221,211,255,252,245 

DATA 21,21,21,85,213,213,17,85 
DATA 85,165,105,169,85,85,17,64 
DATA 64,64,64,85,85,85,85,0 
DATA 1,1,1,85,85,85,85,0 
DATA 64,64,69,85,85,85,85,0 
DATA 0,0,85,85,221,71,221,0 

DATA 0,0,85,85,212,117,221,1 

DATA 1,1,81,85,81,85,221,88 

DATA 88,80,88,80,80,85,221,5 

DATA 4,7,4,7,5,85,221,64 

DATA 64,64,64,85,85,85,221,0 

DATA 0,0,0,84,85, 85, 221,21 

DATA 25,25,25,89,85,85,221,0 

DATA 0,85,85,81,85,85,221,0 

DATA 0,85,85,84,85,85,221,4 

DATA 5,85,85,69,85,85,221,0 

DATA 80,88,80,80,85,119,17,0 

DATA 0,0,0,0,85,119,17,0 

DATA 0;0, 0,0,85,119, 17,0 

DATA 0,0,0,0,85,119,17,8 

DATA 8,0,0,0,85,119,17,6 



Gomputronic 



0$ 



<EH> 

<GE> 

<MA> 

<HP> 

<BA> 

<CE> 

<AA> 

<EF> 

<AF> 

<0G> 

<ML> 

<JG> 

<LG> 

<MP> 

<JM> 

<FN> 

9,0 

<BP> 

<HH> 

<KE> 

<0F> 

<IA> 

<H0> 

<JE> 

<HO> 

<OH> 

<0F> 

<JA> 

<PL> 

O 

<AB> 

<CC> 

<CB> 

<AC> 



<ME> 

<LH> 

<HC> 

<OP> 

<0K> 

<JC> 

<JD> 

<JE> 

<PJ> 

<K6> 

<EP> 

<EA> 

<IC> 

<NA> 

<AL> 

69 

<CA> 

49 

<FC> 

<9A> 

9 

<AH> 

65 

<JA> 

<DÖ> 



660 DATO 0,1,1,1,85,119,17,8 

678 DATA 8,84,168,169,42,187,17,8 

680 DATA O, 0,64, 64, ©5, 119, 17, 8 

696 DATA 0,0,6,6,05,119,17,20 

706 DATA 26,21,21,21,85,119,17,0 

710 l>ATA 0,65,65,150,65,117,17,0 

720 DATA 0,85,85,101,85,65,66,5 

730 DATA 5,85,85,153,85,85,89,64 

740 DATA 64,64,64,64,64,85,85,0 

750 DATA 0,0,0,0,0,69,85,0 

766 DATA 0,6,0,0,0,21,85,0 

776 DATA 0,0,86,84,34,84,85,1 

780 DATA 2,0,0,0,1,5,5,84 

790 DATA 100,84,4,4,85,85,85,5 

860 DATA 5,5,5,5,85,85,85,128 

818 DATA 128,128,128,128,149,149,14 

820 DATA 0,0,0,0,85,85,85,0 

830 DATA 0,28,20,235,235,235,255,0 

840 DATA 6,20,28,185,125,125,235,60 

856 DATA 60,60,60,60,60,66,60,0 

860 DATA 195,65,125,125,150,48,0,0 

878 DATA 8,0,28,52,6,0,8,0 

880 DATA 0,6S,73,60,97,65,O,0 

898 DATA 0,65,105,105,40,48,0,0 

90O DATA 0,60,60,68,175,175,3,1 

918 DATA 1,29,61,249,251,10,2,0 

928 DATA 2,26,58,6,4,52,4,128 

936 DATA 128,184,188,159,223,80,64, 

946 DATA 64,88,92,96,32,44,32,0 

950 DATA 1,129,253,253,29,26,2,0 

968 DATA 0,2,26,10,98,4,4,8 

978 DATA 128,129,191,191,184,88,64, 

988 DATA 6,64,88,72,78,32,32,1 
998 DATA 1,5,13,29,122,234,4,8 
1686 DATA 2,2,18,26,4,28,32,128 
1810 DATA 128,160,176,184,94,87,33, 

1820 DATA 64,64,80,88,32,48,4,0 

1038 DATA 0,0,8,8,0,8,8,0 

1848 DATA 0,0,0,0,0,0,6,0 

1850 DATA 8,8,8,8,0,0,8,8 

1068 DATA 8,0,0,0,8,0,0,112 

1878 DATA 112,112,69,8,29,112,6,112 

1080 DATA 2,112,112,96,96,6,112,6 

1690 DATA 112,6,112,6,112,6,112,6 

1188 DATA 112,48,48,2,65,128,173,3 

1118 DATA 1,1,1,0,128,169,3,141 

1128 DATA 15,210,169,32,141,6,212,1 

1138 DATA 120,141,48,2,169,173,141, 

1140 DATA 2,169,8,141,198,2,169,2 
1158 DATA 133,28,169,1,141,6,218,16 

1168 DATA 175,141,1,210,141,5,210,1 

117© DATA 28,141,8,2X8,18,141,4,210 
1138 DATA 141, 28,288, 281, 2, 288, 248, 



162 

<KI> 

<HO> 

<LC> 

<OJ> 

<CE> 

<EN> 

<FE> 

<MM> 

<FM> 

<BG> 

<OP> 

<BG> 

<PB> 

8 

<L1> 

<EG> 

, 48 

<Fö> 

<DK> 

115 

<BH> 

09 

<HM> 

<8M> 

<OL> 

<BE> 

<BJ> 

<HI> 

<BL> 

33 

<D0> 

<KJ> 

<IC> 

,156 

<OA> 

8 

<HJ> 



<DN> 

141 

<EG> 

,94 

<GF> 

6,41 

<LD> 

5,116 

<ED> 

240 

<FC> 

, 76 

<FG> 

<FF> 

<CC> 

<LK> 

<PB> 

9 

<LB> 

<FE> 

157 

<EL> 



1196 
1280 
1210 
1220 
1238 
1248 
1250 
1260 
1270 
1280 
1290 
1300 
1318 

1328 
1338 

1340 
1350 



DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



0,159,0,157,0,210,232,224 
9,288,248,32,0,160,169,0 
141,36,2,169, 175, 141,37,2 
88,76, 156,174,8,8,8,1 
2,3,4,5,6,7,28,29 
38,31, 32,59,68,61,62,63 
8,0,65,66,3,4,67,3 
4,68,69,78,68, 3,4,35 
47,48,57,58,41,39,48,52 
0,17,25,24,22,55,50, 41 
52,52,37,46,0,34,57,0 
35,33,50,51,52,3 7,46,8 
56,37,41,52,58,237,229,23 



DATA 245,229,38,33,51,52,51,44 

DATA 47,55,108,101,118,101,108 

DATA 44,33,57,37,58,47,46,37 

DATA 52,55,47,188,181,189,111, 



1360 DATA 116,97,114,116,8,183,97,1 

1378 DATA 161,48,41,51,35,47,50,37 

1380 DATA 26,0,16,16,16,16,16,16 

1390 DATA 8,51,35,47,50,37,0,26 

140O DATA 0,16,16,16,16,16,16,52 

1418 DATA 41,45,37,26,8,16,16,16 

1420 DATA 16,16,16,169,8,133,0,133 

1430 DATA 2, 169, 165, 133M, 169, 152,1 

1440 DATA 3,160,0,177,6,145,2,200 

1450 DATA 192,0,208,247,230,1,236,3 

1460 DATA 165,3,201,166,208,235,169 

1478 DATA 141,244,2,173,35,2,261,22 

1480 DATA 240,46,173,134,2,201,0,24 

1490 DATA 40,173,11,212,141,23,288, 

15O0 DATA 22,288,201,18,208,243,169 

1518 DATA 133,116,173,11,212,101,28 

1520 DATA 252,141,24,208,198,116,16 

1536 DATA 208,240,169,8,141,24,208, 

1548 DATA 202,108,254,174,8,236,176 

1558 DATA 27,175,48,58,37,51,51,8 

1560 DATA 52,58,41,39,39,37,50,12 

1578 DATA 55,40,37,46,6,50,37,33 

1588 DATA 36,57,128,162,8,169,0,157 

1590 DATA 8, 29, 232^224, 8, 288, 248,18 

1688 DATA 8, 17**3.57,4,29,23:2,224,32 

1618 DATA 208,245,162,8,189,32,174, 



1628 DATA 43,29,232,224,14,288,245, 
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tfM 



162 






1,2 








<PH> 163Q 


DATA 


0,189,46,174,157,68,29,23 


<FE> 


19SO 


DATA 


208,3,32,154,176,173,160, 


2 






173 








<BG> 1640 


DATA 


224,24,208,245,162,0,189, 


<KB> 


i960 


DATA 


201,3,208,3,32,184,176,88 


70 






<W>> 


1978 


DATA 


76,98,228,173,120,2,201,7 


<FE> 1650 


DATA 


174,157,107,29,232,224,5, 


<CH> 


1980 


DATA 


208,5,169,4,141,161,173,1 


208 






73 








<CK> 1660 


DATA 


245,162,0,189,3,175,157,2 


<HL> 


1990 


DATA 


120,2,201,11,208,5,169,1 


| 26 






<EK> 


2000 


DATA 


141,161,173,169,9,141,124 


<BK> 1670 


DATA 


29, 232,224, 24, 208,245, 162 


,29 








,0 






<KF> 


2010 


DATA 


96,173,120,2,201,7,208,1« 


i <JI> 1688 


DATA 


189 ,83,174, 157 , 146, 29 ,232 


<BD> 


2020 


DATA 


173,162,173,201,9,240,3,2 


[ ,224 






38 








<PP> 1690 


DATA 


$><r 208 ^245 jl62>8 j JLfF? j 99 r A7 


<D6> 


2030 


DATA 


162,173,173,120,2,201,11, 


i 4 

t 




, 


288 








i <FA> 17O0 

1 


DATA 


157,170,29,232,224,6,208, 


<NB> 


2040 


DATA 


10,173,162,173,201,1,240, 


i 245 






3 








1 <HH> 1710 


DATA 


24,173,162,173,105,16,141 


<FE> 


2050 


DATA 


206,162,173,169,9,141,144 


,152 






,29 








<CC> 1720 


DATA 


29,169,8,141,124,29,141,1 


<HO> 


206O 


DATA 


96,173,120,2,201,7,208,5 


44 






<BE> 


207O 


DATA 


169,2,141,163,173,173,120 


<FII> 1730 


DATA 


29,141,164,29,141,184,29, 


,2 








162 






<HH> 


2080 


DATA 


201,11,208,5,169,1,141,16 


<CM> 1740 


DATA 


0,189,75,174,157,126,29,2 


3 








32 






<DD> 


2090 


DATA 


173,169,9,141,164,29,96,1 


<HH> 1750 


DATA 


224,4,208,245,173,161,173 


73 








,201 






<EA> 


2100 


DATA 


120,2,201,7,208,5,169,1 


<HB> 1760 


DATA 


4, 240, 13, 162, O, 189, 79, 174 


<DD> 


2110 


DATA 


141,164,173,173,120,2,201 


<FG> 1770 


DATA 


157,126,29,232,224,4,208, 


,11 








245 






<B0> 


2128 


DATA 


208,5,169*, 0,141, 164, 173,1 


<DH> 1780 


DATA 


162,0,189,94,174,157,166, 


69 








29 






<P0> 


2130 


DATA 


9 , 141 , 184 , 29 , 96 , 169 , 95 , 14 


<IG> 1790 


DATA 


232,224,3,208,245,173,163 


1 








,173 






<IJ> 


2140 


DATA 


34,2,169,228,141,35, 2,96 


<LA> 1800 


DATA 


201,1,240,13,162,0,189,97 


<CK> 


2150 


DATA 


169,98,141,36,2,169,228,1 


<FF) 1810 


DATA 


174 , 157 , 166 , 29 , 232 , 224 , 3 , 


41 








206 






<LE> 


2160 


DATA 


37,2,96,120,32,214,176, 32 


<XX> 1020 


DATA 


245,162,0,189,100,174,157 


<EP> 


2170 


DATA 


225 , 176, 169 , 32 , 141 ,8, 212 , 


,186 






169 








<FD> 1838 


DATA 


29,232,224,4,288,245,173, 


<MI> 


2188 


DATA 


0,133,77,76,51,177,234,96 


164 






<DH> 


2190 


DATA 


112,112,112,112,112,68,0, 


<HP> 1848 


DATA 


173,201,1,240,13,162,0,18 


128 








9 






<BH> 


220O 


DATA 


68,0, 129,68,0*130,68,0 


<XE> 1850 


DATA 


104,174,157,186,29,232,22 


<HP> 


2210 


DATA 


131,68,8,132,68,0,133,68 


4,10 






<EL> 


2220 


DATA 


0,134,68,0,135,68,0,138 


<0A> 1660 


DATA 


208,245,165,0,105,32,133, 


<CS> 


2230 


DATA 


68,0,137,68,0,138,63,0 









<IF> 


2248 


DATA 


139,68,8, 140,68,0,141,65 


<MJ> 1870 


DATA 


176,3,76,98,228,173,120,2 


<IK> 


2250 


DATA 


8,177,169,8,141,48,2,169 


<HC> 1880 


DATA 


201,14,268, 10,173, 160,173 


<PI> 


2260 


DATA 


177,141, 49,2,169,6,141,19 


,201 






6 








<BB> 1890 
20 


DATA 


0,240,3,206,160,173,173,1 


<OP> 



<LK> 


2278 


DATA 


2,169,252,1*1,197,2,169,2 


<AJ> 1908 


DATA 


2,201,13,208,10,173,160,1 


2280 


DATA 


141,198,2,162,0, 169,0,157 


73 






<SO> 


2290 


DATA 


0,210,232,224,9,208,248,1 


<BC> 1910 


DATA 


201,3,240, 3,238,168,173,1 


69 








73 






<CM> 


2300 


DATA 


120,133,20,173,10,210,141 


<KH> 192Ö 


»ATA 


160,173,201,0,208,3,32,84 


,26 








<BH> 1930 

,3 

<EH> 1940 


DATA 


176,173,160,17 3,201,1,208 


<HB> 

1 
<CJ> 


2318 


DATA. 


208,169,10,141,0,210,206, 


DATA 


32,114,176,173,168,173,20 


2320 


DATA 


210,165,20,141,1,210,201, 



omputronic 



67 



fl^v 



ISO 






<HG> 


2640 


DATA 


214,176,173,0,177,201,112 


<HP> 2330 


DATA 


208,233,169,128,133,113,1 


,240 








69, O 






<MH> 


2650 


DATA 


8,169,112,141,0,177,76,90 


<ED> 2348 


DATA 


133 , 112 , 160 , O , 169 , 75, 145 , 


<AH> 


2660 


DATA 


228,169,96,141,8,177,76,9 


1X2 






5 








<FG> 2350 


DATA 


200, 192, O, 208, 249, 169, 79 , 


<MJ> 


2670 


DATA 


228,173,11,212,101,20,41, 


160 






5 








<GH> 2360 


DATA 


10,145,112,160,29,145,112 


<BH> 


2880 


DATA 


141,23,208,173,35,2,201,2 


,230 






28 








<OF> 2370 


DATA 


113,165,113,201,148,208,2 


<EK> 


2690 


DATA 


208,239,169,32,141,0,212, 


27,169 






120 








<8£> 238« 


DATA 


128, 133, 113, 169, 141, 133, 1 


<00> 


2700 


DATA 


169,62,141,47,2,169,33,14 


15,169 






1 








<DN> 2390 


DATA 


8,133,112,133,114,169,11, 


<0L> 


2710 


DATA 


111,2,169,3,141,29,208,16 


133 






9 








<LI> 2400 


DATA 


116,169,27,133,117,164,11 ■ 


<BI> 


2720 


DATA 


64,141,7,212,169,10,141,1 


6,169 






92 








<HM> 2410 


DATA 


76,145,112,169,73,145,114 


<IN> 


2730 


DATA 


2,169,38,141,193,2,169,1 


,2»0 






<PK> 


2740 


DATA 


141,8,208,141,9,208,169,6 


<XL> 2420 


DATA 


169,78,145, 112, 169,71,145 


8 








,114 






<AK> 


2750 


DATA 


133,113,169,0,133,112,160 


<LH> 2430 


DATA 


196, 117, 208, 243, 200, 169, 7 


,8 








7,145 






<BD> 


2760 


DATA 


169,0,145,112,200,192,0,2 


<LD> 2440 


DATA 


112,169,74, 145, 114, 230, 11 


08 








3,198 






<NH> 


2778 


DATA 


249,230,113,165,113,201,1 


<MM> 24SO 


DATA 


115,230,116,198,117,165,1 


52,208 






13,201 






<CJ> 


2780 


DATA 


237,162,0,189,114,174,157 


<HM> 2460 


DATA 


134,208,210,164,116,169,0 


,4 








,145 






<HC> 


2790 


DATA 


77,189,129,174,157,44,77, 


<KF> 2470 


DATA 


112, 200, 192 , 23, 208, 249, 23 


232 






t 


0,113 






<FC> 


2800 


DATA 


224,15,208,239,162,0,189, 


<LF> 2480 


DATA 


165,113,201,136,208,237,1 


144 








69,23 






<FC> 


2818 


DATA 


174,157,24,77,232,224,12, 


<HO> 2490 


DATA 


133,117,169,170,141,0,210 


208 








,169 






<PE> 


2820 


DATA 


245,108,254,178,234,148,1 


<AJ> 2500 


DATA 


175,141,2,210,169,140,141 


79,112 






,1 






<EN> 


2830 


DATA 


112,112,1,87,179,118,23», 


<EE> 2510 


DATA 


210,141,3,210,88,169,134, 


123 








133 






<0E> 


2840 


DATA 


116,236,124,116,236,125,1 


<HE> 2520 


DATA 


113,169,136,133,115,173,1 


16,236 






20,2 






<OJ> 


2858 


DATA 


126,116,236,127,116,236,1 


<LE> 2530 


DATA 


201,14,208,249,234,234,23 


28,116 






4,169 






<0E> 


2860 


DATA 


236,129,116,236,130,116,2 


<EE> 2540 


DATA 


0,133,0,169,41,141,34,2 


36 , 131 






<CL> 2SSO 


DATA 


169,178,141,35,2,76,130,1 


<HE> 


2870 


DATA 


116,236,132,212,236,133,1 


7« 






12,1 








<GG> 2568 


DATA 


230,0,165,0,141,0,210,10 


<IP> 


2880 


DATA 


43,179,68,0,77,132,112,1 


<KI» 2570 


DATA 


141,2,210,201,12,240,3,76 


<DP> 


2890 


DATA 


118,179,116,76,93,116,76, 


<OP> 258« 


DATA 


95 , 228 , 169 ,0, 133,0, 165 , 11 


94 








3 






<AF> 


2900 


DATA 


116,76,95,116,76,96,115,7 


<HM> 2598 


DATA 


133,204,164,116,169,8,145 


6 








,112 






<AP> 


2910 


DATA 


97,116,76,98,116,76,99,11 


<OA> 2680 


DATA 


200, 196, 117 , 208 , 249 , 238, 1 


6 








13,165 






<EX> 


2920 


DATA 


76,180,116,76, 181,116,76, 


<OD> 2618 


DATA 


113,197,115,208,237,165,2 


102 








04,133 






<GD> 


2930 


DATA 


84,78,103,65,0,179,68,0 


<NP> 2620 


DATA 


113,198,113,198,116,230,1 


<A0> 


2948 


DATA 


78,68,8*79,68,8, 88,68 


15,230 
<D0> 2630 


DATA 


117,165,113,201,123,208,3 


<MJ> 
<PK> 


29SO 
296© 


DATA 
DATA 


0,81,68,0,82,69,8,83 
66,8,84,68, 0,8-5, 213,0 


,32 






<DJ> 


2970 


DATA 


86,14,1,43,179,68,8,78 



Computronic 



tfM 



<ND> 2980 

<AL> 2990 

<HE> 3660 

<LP> 3010 

<0Ö> 3020 

7 

<BJ> 3630 

57 

<BB> 304« 

62 

<Mt» 3050 

<K0> 3068 

8,243 

<AF> 3070 

7 

<BE> 3OO0 

<0I> 3090 

4 

<CN> 3108 

,0 

<«J> 3110 

33,252 

<IM> 3120 

9,98 

<EM> 3130 

,48 

<IH> 3140 

<EP> 3158 

112 

<DK> 3160 

230 

<HA> 3170 

41,232 

<PK> 3160 

8 

<8E> 3190 

*t 

<JF> 320Ö 

3, 165 

<GF> 3210 

24,3 

<CD> 3220 

45 

<AA> 3230 

08 

<8P> 3248 

03 

<AK> 325Ö 

<1I> 3260 

<EC> 3270 

162 

<ME> 3280 

<6H> 3296 

, 10O 

<LL> 3300 

01,128 

<L0> 3310 

W JL f JL Jr> Jt 



DATA 68,8,79,88,0,80,68,0 

DATA 81,68,0,82,69,8,83,68 

DATA 0,84,68,0,85,88,0,86 

DATA 65,8,179,162,0,189,146,29 

DATA 41,191,157,64,77,232,224, 

DATA 208,243,162,0,189,0,172,1 

DATA 0,159,232,224,0,208,245,1 

DATA 0,169,40,157,7,179,157,52 
DATA 179,232,232,232,224,33,20 

DATA 162,0,169,98,157,8,179,15 

DATA 53,179,24,185,1,232,232,2 

DATA 224,33,208,246,169,6,141, 

DATA 179,169,51,141,49,179,169 

DATA 133,255,133,254,133,253,1 

DATA 169,48,133,250,133,248,16 

DATA 133,249,133,251,169,0,141 

DATA 2,169,179,141,49,2,162,0 
DATA 169,98,133,113,189,8,133, 

DATA 169,1,172,18,210,145,112, 

DATA 113,165,113,281,141,288,2 

DATA 224,8,268,228,162,8,169,9 

DATA 133,113,169,8,133,112,169 

DATA 172,10,210,145,112,230,11 

DATA 113,261,141,208,241,232,2 

DATA 208,228,162,6,169,72,157, 

DATA 102,24,195,1,232,224,18,2 

DATA 245, 162,0, 169, &2 , 157, 45,1 

DATA 24,105,1,232,224,10,288*2 

DATA 162,8,169,80,157,0,83,24 
DATA 105,1,232,224,48,208,245, 

DATA 3,142,66,99,232,142,61,99 
DATA 232,142,68,100,232,142,61 

DATA 232,142,200,120,232,142,2 

DATA 232,142,200,121,232,142,2 



<Mt> 


3326 


DATA 


11,136 




<M0> 


3330 


DATA 


11,137 




<EH> 


3340 


DATA 


180 






<MP> 


3350 


DATA 


16,136 




<EG> 


3360 


DATA 


112 






<0E> 


3376 


DATA 


6 






<GH> 


3386 


DATA 


,112 






<OG> 


3390 


DATA 


6 






<OL> 


3400 


DATA 


3 






<KI_> 


3410 


DATA 


<JG> 


3420 


DATA 


3,112 




<0B> 


3430 


DATA 


7 






<CE> 


3440 


DATA 


68 






<PM> 


3458 


DATA 


1 






<PA> 


346Q 


DATA 


3 






<ED> 


3470 


DATA 


240 






<GL> 


3480 


DATA 


,63 






<ME> 


3490 


DATA 


4,173 




<AP> 


356« 


DATA 


85 






<ML> 


3516 


DATA 


^7 Jt JL 7 rt 




<KI> 


3528 


DATA 


<OL> 


3536 


DATA 


3 






<PX> 


3S40 


DATA 


2 






<DP> 


35SO 


DATA 


112 






<LH> 


3568 


DATA 


<EM> 


3578 


DATA 


212 






<ÖK> 


3588 


DATA 


8 






<OM> 


3590 


DATA 


1 






<AN> 


3606 


DATA 


64 






<HH> 


3618 


DATA 


1 






<KI> 


3628 


DATA 


<JP> 


3636 


DATA 


<GI> 


3640 


DATA 



232,142,110,138,232,142,1 
232,142,110,137,232,142,1 
169,152,141,244,2,76,262, 

104.110. 132. 120. 108. 128.1 

113,124,160,0,169,92,146, 

24,105,1,200,192,8,268,24 

230,113,160,0,169,100,145 

24,185,1,200,192,8,208,24 

96, 169, 1,133, O, 173, 162,17 

133,1,236,1,166,0,189,161 
180, 133, 113 , 173 , lO, 210, 13 

32,171,180,236,6,165,0,19 

1,208,233,169,240,141,78, 

169,64,141,77,68,169,8,14 

8,288,169,86,141,0,208,17 

164,173,201,1,240,10,169, 

141, 190, 68, 169, 64, 141, 189 

169,152,141,85,181,173,18 

281,8,248,18,169,156,141, 

181,169,118,141,49,179,16 

141 . 14 . 212 . 169 . 62 . 141 .8.2 
169,181,141,1,2,169,80,13 

8,88,76,114,181,72,169,15 

141,18,212,141,9,212,169, 

141,26,288, 169,83,141,0,2 
184,64,72,169,156,141,18, 

141,9,212,169,8,141,26,28 

169,62,141,8,2,165,254,14 

4,212,165,255,141,5,212,1 

64,169,1,133,20,165,26,20 

2,288,258,165,8,141,8,288 
141,1,288,141,8,218,185,5 
18,141,2,218,238,8,165,6 



lomputronlc 



#M 



<IG> 


3650 


DftTA, 


201,90,208,5,169,1,141,8 


48 








<EJ> 


3660 


DATA 


288,165,0,, 281,100,208, 53, 


<AL> 


4000 


DATA 


165,252,141,4, 212,162,8,1 


169 








65 








<LI> 


3670 


DATA 


0,141,8,208,141,9,208,162 


<ID> 


401O 


DATA 


248,157,7,179,232,232,232 


<AK> 


3680 


DATA 


0,189,16,173,157,73,68,18 


,224 








9 








<FK> 


402O 


DATA 


33, 208, 246, 76, 95, 228, 128, 


<P0> 


3690 


DATA 


24,173,157,73,69,232,224, 


169 








e 








<ID> 


4030 


DATA 


3,133,253,133,255,234,169 


<HL> 


37O0 


DATA 


208, 239, i73, 164 , 173, 201 j 1 


,194 








,240 








<LE> 


4048 


DATA 


141,36,2,169,191,141,37,2 


<CO> 


3710 


DATA 


19,162,0,189,16,173,157,1 


<EK> 


4050 


DATA 


162,0,169,0,157,0,6,232 


88 








<CH> 


4O60 


DATA 


224,0,208,248,32,148,187, 


<GP> 


3720 


DATA 


68,189,24,173,157,188,69, 


76 








232 








<BB> 


4870 


DATA 


7,32,0,0,0,0,8,39 


<BE> 


373© 


DATA 


224,8,208,239,165,0,281,1 


<PB> 


4080 


DATA 


33,45,37,0,0,47,54,37 


io 








<JI> 


409O 


DATA 


50,0,8,0,0,0,112,112 


<LM> 


3740 


DATA 


288,8,169,1,141,8,208,141 


<HL> 


4100 


DATA 


112,71,227,182,65,247,182 


<BH> 


3750 


DATA 


9,208,165,0,201,120,208,1 


,120 








37 








<LN> 


4110 


DATA 


169,8, 133,77, 32,12,183,88 


<KF> 


3760 


DATA 


169,0,141,2,210,141,3,210 


<CD> 


4120 


DATA 


76,98,228,173,163,173,201 


<PN> 


3778 


DATA 


169,84,141,199,2,189,0,13 


,1 








3 








<GJ> 


4130 


DATA 


248, 10,173, 1,6, 281, 1,240 


<LF> 


3780 


DATA 


112,133,114,169,98,133,11 


<EJ> 


4140 


DATA 


3,32,68,185,173,0,6,201 


3,16» 






<1C> 


4158 


DATA 


1,240,3,32,42,183,76,246 


<0C> 


3730 


DATA 


8,169,0, 145, 112,280,192,4 


<BJ> 


4160 


DATA 


189,32,62,185,173,128,2,2 


1 








Ol 








<MG> 


3800 


DATA 


208,249,230,113,165,113,2 


<BI> 


4170 


DATA 


15,288,3, 173,2,6,141,2 


Ol, 141 






<LJ> 


4180 


DATA 


6,201,9,288,11,169,64,141 


<HL> 


3810 


DATA 


208,237,173,164,173,201,1 


<LK> 


4190 


DATA 


4,6,32,150,183,32,237,183 


,240 








<HF> 


4200 


DATA 


201,11, 208,8/189,8, 141,4 


<FA> 


3820 


DATA 


3,76,191,182,128,169,114, 


<HC> 


4210 


DATA 


6,32,158,183,201,10,208,1 


141 








1 








<MA> 


3839 


DATA 


34,2,169,182,141,35,2,169 


<LC> 


4220 


DATA 


169,32,141,4,8,32,150,183 


<LE> 


3840 


DATA 


0,133,19,133,20,88,173,11 


<BI> 


4238 


DATA 


32,198,183,234,281,6,288, 


<IJ> 


3850 


DATA 


212,201,58,208,249,169,60 


11 








,133 








<MB> 


4240 


DATA 


169,48,141,4,6,32,174,183 


<DF> 


3860 


DATA 


117,173,11,212,10,101,20, 


<PI> 


4250 


DATA 


32 , 198 , 183 , 281 , 7 , 208 , 8 , 16 


141 








9 








<NN> 


3870 


DATA 


24,208,173,11,212,18,105, 


<LB> 


4260 


DATA 


16,141,4,6,32,174,183,201 


4 








<FE> 


4270 


DATA 


5,208, 11,169,80,141,4,6 


<LP> 


3880 


DATA 


141 , 22 , 208 , 198 , 117 , 165 , 11 


<FE> 


4280 


DATA 


32,174,183,32,237,183,234 


7,208 






,32 








<CH> 


3890 


DATA 


232,169,20,141,24,208,169 


<«B> 


4290 


DATA 


137,187,169,255,96,173,16 


,6 








1,173 






<EE> 


39QÖ 


DATA 


141,22,208,165,19,201,30, 


<DJ> 


4300 


DATA 


201,1,208,12,238,252,165, 


208 








252 








<BM> 


3910 


DATA 


205 , 169, 64 , 141 , 14 , 212 , 169 


<KM> 


4310 


DATA 


201,4,208,6,169,0,133,252 


,0 








<MK> 


432© 


DATA 


198,248,76,147,133,173,16 


<0G> 


3920 


DATA 


141,8,208,141,1,208,76,16 


1,173 






5 








<EJ> 


4330 


DATA 


201,1,208,12,198,252,165, 


<IM> 


3938 


DATA 


173,162,0,169,0,157,0,86 


252 








<LC> 


3948 


DATA 


232, 224, 40, 288, 248, 169 , 12 


<BI_> 


4340 


DATA 


201,255,208,6,169,3,133,2 


0,141 






52 








<0H> 


3950 


DATA 


10,85,166,20,169,121,157, 


<MA> 


4358 


DATA 


236,248,76, 14 7,183,173,16 


e 








1,173 






<MB> 


3960 


DATA 


86,224,48,208,6,169,8,133 


<BE> 


4360 


DATA 


201,4,208,15,24,165,253,1 


<BH> 


3970 


DATA 


20,230,19,173,161,173,201 


05 








,4 








<0D> 


4370 


DATA 


254,133,253,165,253,201,2 


<LK> 


3980 


DATA 


248,12,198,252,165,252,20 


55,240 






1,255 






<IC> 


4388 


DATA 


10 , 208 , 14 , 198 , 2S3 , 165 , 253 


<CJ> 


3998 


DATA 


288 , 6 , 169 , 3 , 133 , 252 , 230 , 2 











70 



Computronlc 



#M 



,261 

<DE> 4390 
98 

<LL> 4408 
3,281 
<KP> 4410 
<EC> 442« 
,19 

<EI> 4430 
1,6 

<BP> 4440 
49 

<FE> 44SO 
212 

<Ift> 4460 
,201 

<GC> 4470 
165 

<FM> 4480 
133 

<DG> 4490 
79 

<KJ> 4500 
6,162 
<PF> 4510 
5 

<EB> 4520 
244 

<IH> 4530 
,206 

<0P> 4540 
,24 

<!_!> 4550 
<HK> 4560 
<IA> 4570 
54,6 

<6C> 4580 
<MA> 4590 
<BD> 4600 
<MC> 4610 
<PC> 4620 
5 

<O0> 4630 
<OI> 4640 
1 

<FG> 4650 
249 

<BT> 4660 
77 

<FM> 46 70 
<DL> 4680 
73 

<HA> 4690 
<HI>> 4708 
<OM> 4710 
.3 

<BH> 4720 
12 

<CA> 4730 
38 



DATA 255,208,6,169,7,133,253,1 

DATA 249,76,147,183,173,161,17 

DATA 4,208,15,24,165,253,105,2 
DATA 133,253,165,253,201,9,240 

DATA 208,14,230,253,165,253,20 

DATA 208,6,169,0,133,253,230,2 

DATA 76,147,183,165,252,141,4, 

DATA 165,253,141,5,212,165,249 

DATA 88,208,4,169,140,133,249, 

DATA 249, 201, 141,208, 4, 169, 69 r 

DATA 249,162,0,165,248,157,7,1 

DATA 232,232,232,224,33,208,24 

DATA 0,24,165,249,167,0,179,10 

DATA 1,232,232,232,224,33,208, 

DATA 162,60,169,73,133,204,133 

DATA 134,205,232,134,207,160,0 

DATA 173,4,6,170,105,8,141,254 
DATA 6,189,0,173,145,204,189,8 
DATA 173,145,206,200,232,236,2 

DATA 208, 239, 173, 6, 6, 20S, 7, 6 
DATA 208,67,173,132,2,240,1,96 
DATA 173,2,6,41,3,201,3,208 
DATA 246,165,248,141,6,6,32,48 
DATA 185,141,7,6,165,249,24,10 

DATA 6,141,8,6,173,2,6,141 
DATA 14,6,234,234,234,169,0,14 

DATA 12,6,165,248,133,112,165, 

DATA 24,105,6,133,113,160,24,1 

DATA 112,141,16,6,96,173,6,6 
DATA 133,112,173,8,6,133,113,1 

DATA 12,6,24,105,10,141,0,210 
DATA 141,12,6,173,14,6,201,11 
DATA 208,3,76,11,185,160,24,17 

DATA 16,6,145,112,160,25,177,1 

DATA 141,16,6,169,15,145,112,2 



<JE> 4740 

<LP> 4750 

<PB> 4768 

5 

<BG> 4770 

,6 

<PE> 4780 

3 

<PK> 4790 

<LK> 4800 

<F8> 4810 

<PC> 4820 

1 

<EI> 4830 

246 

<JF> 4840 

<EJ> 4850 

,11 

<LP> 4860 

<CE> 4870 

11 

<M0> 488Q 

<AE> 4898 

9 

<LF> 4900 

<FG> 4910 

<IM> 4920 

,234 

<MJ> 4930 

1,173 

<EH> 4940 

254 

<LJ> 4950 

<MP> 4960 

1,173 

<FH> 4970 

254 

<CH> 4980 

54 

<MF> 4990 

1,173 

<AO> 5000 

05 

<HP> 5010 

55,240 

<MO> 5020 

,201 

<CO> 5030 

98 

<LH> 5048 

3,261 

<LC> 5050 

<EH> 5060 

,16 

<EM> 5070 

1,8 

<BL> 5080 

51 

<MD> 5Q90 

4,234 



DATA 6,6,173,6,6,205,7,6 

DATA 208,7,160,25,173,16,6,146 

DATA 112,96,160,24,173,16,6,14 

DATA 112,160,23,177,112,141,16 

DATA 169,15,145,112,206,6,6,17 

DATA 6,6,205,7,6,208,7,160 
DATA 23,173,16,6,145,112,96,24 
DATA 174,2,6,224,7,208,3,105 
DATA 20,96,105,234,96,169,1,14 

DATA 12,184,173,161,173,201,4, 

DATA 5,169,0,141,12,184,96,76 
DATA 80,187,234,234,201,10,208 

DATA 169,32,141,5,6,32,150,185 
DATA 32,198,185,234,201,6,208, 

DATA 169,48,141,5,6,32,174,185 
DATA 32, 198, 18S, 201,7,208, 8, 16 

DATA 16,141,5,6,32,174,185,201 
DATA 5,208,11,169,80,141,5,6 
DATA 32,174,185,32,237,185,234 

DATA 234,234,169,255,96,173,16 

DATA 201,1,208,12,230,254,165, 

DATA 201,4,208,6,169,0,133,254 
DATA 198, 258*76,147, 185, 173,16 

DATA 201,1,208,12,190,254,165, 

DATA 201,255,208,6,169,3,133,2 

DATA 230,250,76,147,185,173,16 

DATA 201,4,208,15,24,165,255,1 

DATA 254,133,255,165,255,201,2 

DATA 10,208,14,198,255,165,255 

DATA 25S, 208,6,169, 7, 133, 255,1 

DATA 251,76,147,185,173,161,17 

DATA 4,208,15,24,165,255,105,2 
DATA 133,255,165,255,201,9,240 

DATA 208,14,230,255,165,255,20 

DATA 208/6,169,0,133,255,230,2 

DATA 76,147,185,165,262,234,23 



Com pulron Sc 



71 



0® 



<NN> 


5166 


DATA 


165,253,234,234,234,165,2 


246 








51/201 






<JA> 


5488 


DATA 


5,169,8, 141,12,186,96,32 


<FD> 


5116 


DATA 


58,268,4,169,146,133,251, 


\BIO 


5498 


DATA 


62,187,173,121,2,261,16,2 


165 








88 








<EN> 


5126 


DATA 


251, 261, 141,288, 4, 169, 89, 


<0B> 


5588 


DATA 


3,173,3,6,141,3,6,261 


133 








<FJ> 


5518 


DATA 


9,288,11,169,84,141,5,8 


<FA> 


5136 


DATA 


251,162,6,165,256,157,52, 


<EH> 


5528 


DATA 


32,158,185,32,237,185,281 


175 








,11 








<KK> 


9146 


DATA 


232,232,232,224,33,288,24 


<CD> 


5538 


DATA 


288,8, 169 , 8 , 141 , 5 , 6 , 32 


6,162 






<JC> 


5548 


DATA 


158,185,32,85,185,169,138 


<BP> 


5156 


DATA 


8,24,165,251,157,53,179,1 


,141 








OS 








<PC> 


5558 


DATA 


3,218,32,28,186,76,237,16 


<EC> 


5168 


DATA 


1,232,232,232,224,33,288, 


7 








244 








<BJ> 


5566 


DATA 


169,139,141,1,218,32,28,1 


<LP> 


5176 


DATA 


162 » 68 , 169 , 188 , 133 , 284 , 13 


84 








3,286 






<JÖ> 


5578 


DATA 


76,157,167,169,7,141,2,6 


<EA> 


5186 


DATA 


134,285,232,134,287,168,6 


<GE> 


5588 


DATA 


32,64,186,96,165,248,133, 


,24 








112 








<I_L> 


5196 


DATA 


173,5,6,178,185,8,141,255 


<FB> 


5598 


DATA 


165,249,24,185,6,133,, 113, 


<MC> 


5266 


DATA 


6,189,6,173,145,284,189,8 


168 








<HJ> 


5216 


DATA 


173, 145 , 286, 288, 232, 236, 2 


<EC> 


5688 


DATA 


23,177,112,24,105,248,144 


55,6 








,24 








<IH> 


5226 


DATA 


288,239,173,9,6,265,18,6 


<IM> 


5618 


DATA 


169,1,141,8,6,76,224,187 


<LJ> 


5236 


DATA 


268 ,67,173, 133 , 2 , 248, 1 , 96 


<IM> 


5628 


DATA 


162,8,169,8,157,8,66,157 


<BF> 


5246 


DATA 


173,3,6,41,3,261,3,288 


<BP> 


5638 


DATA 


6,69,232,224,168,288,245, 


<LP> 


5256 


DATA 


246 , 165 , 258 , 141 , 9 , 6 , 32 , 48 


96 








<BI> 


5266 


DATA 


187,141,16,6,165,251,24,1 


<CE> 


5648 


DATA 


177,112,24,185,253,176,1, 


65 








96 








<BK> 


5276 


DATA 


6 , 141 ,11, 6, 173, 3, 6, 141 


<IA> 


5658 


DATA 


234,281,12,248,258,169,88 


<0K> 


5266 


DATA 


15,6,234,234,234,169,8,14 


,141 






* 


1 








<KD> 


5668 


DATA 


37,183,169,188,141,38,183 


<EK> 


5296 


DATA 


13,6,165,258,133,112,165, 


,169 








251 








<GG> 


5678 


DATA 


87,141,4,179,169,156,141, 


<BA> 


5366 


DATA 


24,185,6,133,113,166,24,1 


244 








77 








<FM> 


5686 


DATA 


2,76,185,187,165,258,133, 


<FI> 


5316 


DATA 


112,141,17,6,96,173,9,6 


112 








<DN> 


5326 


DATA 


133,112,173,11,6,133,113, 


<EL> 


5696 


DATA 


165,251,24,185,6,133,113, 


173t 








168 








<6L> 


5336 


DATA 


13,6,24,165,16,141,2,218 


<BF> 


5788 


DATA 


23,177,112,24,165,240,176 


<HG> 


5346 


DATA 


141,13,6,173,15,6,281,11 


,3 








<ÖP> 


5356 


DATA 


266,3,76,11,187,168,24,17 


<GB> 


5716 


DATA 


76,26,18«, 169,1,141,1,6 


3 








<f!G> 


5728 


DATA 


76,51,188,162,8,169,8,157 


<BJ> 


5366 


DATA 


17,6,145,112,160,25,177,1 


<FG> 


5736 


DATA 


0,68,157,0,69,2 32,224,0 


12 








<IL> 


5748 


DATA 


288,245, 96, 177,112,24,185 


<CC> 


5378 


DATA 


141,17,6,169,15,145,112,2 


,253 








33 








<BJ> 


5758 


DATA 


176,1,96,234,281,12,246,2 


<MF> 


5366 


DATA 


9,6,173,9,6,285,16,6 


56 








<MB> 


5396 


DATA 


268,7,168,25,173,17,6,145 


<JP> 


5768 


DATA 


169,39,141,27,183,169,189 


<OK> 


5460 


DATA 


112,96,168,24,173,17,6,14 


,141 








5 








<KF> 


5778 


DATA 


28,183,169,118,141,49,179 


<AP> 


5416 


DATA 


112,168,23,177,112,141,17 


,169 








,6 








<GC> 


5786 


DATA 


156,141,85,181,76,12,188, 


<0P> 


5426 


DATA 


169, 15, 145, 112,286, U, 6, 17 


141 








3 








<MP> 


5796 


DATA 


3,6,169,36,141,2 7,183,169 


<BP> 


5436 


DATA 


9,6,285,18,6,288,7,168 


<JC> 


5888 


DATA 


185,141,28,183,169,183,14 


<I_M> 


5446 


DATA 


23,173,17,6,145,112,96,24 


1, 38 








<FD> 


5456 


DATA 


174,3,6,224,7,288,3,165 


<GC> 


5818 


DATA 


183,169,42,141,37,183,96, 


<PI» 


5468 


DATA 


28,96,185,234,96,169,1,14 


162 








1 








<IF> 


5828 


DATA 


8,169,8,157,8,84,232,224 


<EI_> 


5478 


DATA 


12,186,173,161,173,281,4, 


<OE> 


5838 


DATA 


48,288,248,173,120,2,281, 



Computronic 
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7 


27 








<l_H> 5848 DATA 288,3,238,54,6,201,11,208 


<0N> 


6278 


DATA 


6, 169, 122 , 145, 114, 206, 25, 


<EP> 5858 DATA 3, 286, 54, 6, 281, 14, 280, 3 


6 








<P8> 5860 DATA 76, 14, 189, 173,54,6, 291, 25 


<FC> 


6280 


DATA 


173,25,6,205,26,6,240,1 


5 


<MI> 


6290 


DATA 


96,173,27,6,145,114,169,8 


<MH> 5878 DATA 288,5,169,39,141,54,6,173 


<FE> 


6300 


DATA 


141, 1,210, 96, 198, 251, 198 i 


<FI> 5888 DATA 54,6,281,48,268,5,169,8 


251 








<MH> 5898 DATA 141,54,6,174,54,6,169,128 


<IL> 


6310 


DATA 


169,152,141,85,181,169,80 


<IJ> 5988 DATA 157,8,84,173,19,6,285,28 


,141 








<HL> 5918 DATA 6,288,35,173,132,2,281,8 


<JI> 


6320 


DATA 


27, 183 , 169, 185 , 141 , 28 , 183 


<JC> 5928 DATA 288,27,174,54,6,142,18,6 


,169 








<AG> 5938 DATA 169,85,141,19,6,169,77,14 


<NA> 


6330 


DATA 


51,141,49,179,96,174,29,6 


1 


<CP> 


6340 


DATA 


189,254,77,141,32,6,169,2 


<CG> 5948 DATA 20,6,189,0,85,141,21,6 


51 








<MC> 5958 DATA 169,18,141,22,6,96,24,173 


<GB> 


6350 


DATA 


157,254,77,232,169,8,157, 


<HO> 5968 DATA 22,6,185,15,141,22,6,141 


254 








<0H> 5976 DATA 8,218,169,47,141,1,218,17 


<CB> 


6366 


DATA 


77,32,1,1,173,29,6,281 


4 


<MI> 


6370 


DATA 


255,208,5,169,88,141,29,6 


<FE> 5986 DATA 19,6,134,113,282,134,116, 


<PM> 


6380 


DATA 


174,36,6,189,254,78,141,3 


169 


3 








<0G> 5990 DATA 8,133,112,133,114,172,18, 


<GL> 


6390 


DATA 


6,189,253,157,254,78,202, 


6 


169 








<EB> 6688 DATA 173,21,6,145,112,177,114, 


<FF> 


6400 


DATA 


0,157,254,78,234,234,234, 


141 


173 








<BF> 6818 DATA 21,6,169,122,145,114,286, 


<EK> 


6410 


DATA 


30,6,201,60,208,5,169,0 


19 


<LM> 


6426 


DATA 


141,38,6,174,31,6,189,254 


<E«> 6828 DATA 6,173,19,6,285,28,6,240 


<DB> 


6430 


DATA 


79,141,34,6,169,254,157,2 


<LL> 6038 DATA 1,96,173,21,6,145,114,169 


54 








<PE> 6848 DATA 8,141,1,218,96,198,249,19 


<DE> 

34 

<EN> 


8440 


DATA 


79,232,169,0,157,254,79,2 


8 

<FT> 6658 DATA 249,169,152,141,244,2,169 


6450 


DATA 


234 , 234, 173, 31 , 8 , 281 , 255 , 


$ 4 jL 


288 








<IP> 6868 DATA 141,37,183,169,183,141,38 


<LI> 


6460 


DATA 


5,169,188,141,31,6,173,36 


,183 


<FM> 


6470 


DATA 


6,285,37,6,208,77,162,8 


<JE> 6878 DATA 169,6,141,4,179,96,162,0 


<TL> 


6488 


DATA 


173,54,6,221,29,6,248,23 


<I_J> 6888 DATA 169,8,157,0,85,232,224,48 


<BK> 


6498 


DATA 


232,224,3,288,243,162,8,1 


<BK> 6898 DATA 208,248,173,121,2,201,7,2 


73 








88 


<1E> 


6588 


DATA 


55,6,221,29,6,248,17,232 


<EH> 6180 DATA 3,238,55,6,201,11,208,3 


<FE> 


6510 


DATA 


224,3,288,243,76,244,198, 


<IA> 6110 DATA 206,55,6,281,14,288,3,76 


173 








<FC> 6120 DATA 221,189,173,55,6,281,255, 


<IM> 


6526 


DATA 


54,6,141,35,6,76,151,190 


288 


<JK> 


6530 


DATA 


173,55,6,141,35,6,169,78 


<JE> 6138 DATA 5,169,39,141,65,6,173,55 


<JG> 


6540 


DATA 


141,36,6,169,86,141,37,6 


<HI_> 6148 DATA 6,281,48,208,5,169,8,141 


<EP> 


6550 


DATA 


169,26,141,4,218,169,138, 


<MH> 6150 DATA 55,6,174,55,6,169,121,157 


141 








<CF> 6168 DATA 0,85,173,25,6,205,26,6 


<FL> 


6560 


DATA 


5,210,174,35,6,189,8,80 


<NP> 6170 DATA 208,35,173,133,2,201,0,20 


<U_> 


6570 


DATA 


141, 38, 6, 173, 35 , 6, 133, 112 


8 


<EN> 


6580 


DATA 


133,114,174,36,6,134,113, 


<JF> 6188 DATA 27,174,55,6,142,24,6,169 


232 








<MK> 6198 DATA 85,141,25,6,169,77,141,26 


<00> 


6598 


DATA 


134,115,160,0,173,38,6,14 


<GA> 6286 DATA 8,189,8,85,141,27,6,189 


5 








<1I> 6216 DATA 18,141,28,6,96,24,173,28 


<FD> 


6680 


DATA 


112,177,114,141,38,6,169, 


<EG> 6226 DATA 6,105,15,141,28,6,141,8 


252 








<BE> 6238 DATA 210,169,47,141,1,210,174, 


<6G> 

8 

<IA> 


6610 


DATA 


145,114,173,39,6,24,185,2 


25 

<BA> 6248 DATA 6,134,113,202,134,115,169 


6620 


DATA 


141,39,6,141,4,210,32,28 


,0 


<FJ> 


6630 


DATA 


1,173,36,6,285,37,6,288 


<EE> 6258 DATA 133,112,133,114,172,24,6, 


<LD> 


6640 


DATA 


18,169,8,141,5,210,173,38 


173 


<OF> 


6650 


DATA 


6,145,114,169,18,141,6,21 


<8M> 6268 DATA 27,6,145,112,177,114,141, 
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<OG> 

1 

<FJ> 

<EH> 

, 40 

<IP> 

<HN> 

«141 

<EP> 

<MJ> 

<CE> 

<NG> 

<JG> 

<IJ> 

<PM> 

6 

<LM> 

<IF> 

<PA> 

7 

<LJ> 

<IK> 

<PM> 

8 

<MK> 

<IF> 

<PI> 

9 

<NG> 

<IP> 

<AA> 

7 

<GB> 

<LG> 

<DA> 

<FK> 



6660 DATA 173,40,6,201,255,248,6,14 

6670 DATA 7,210,266,40,6,173,38,6 
660Q DATA 201,120,208,13,169,16,141 

6690 DATA 6,169,0,141,1,210,76,177 
6700 DATA 187,201,121,200,13,169,16 

6710 DATA 40,6,169,0,141,3,210,76 

6720 DATA 4,188,169,0,133,77,174,42 

6730 DATA 6,173,48,6,157,0,99,202 

6746 DATA 189,0,99,141,48,6,169,155 

6750 DATA 157,0,99,206,42,6,174,43 

6766 DATA 6,173,49,6,157,0,120,202 

6770 DATA 189,0,120,141,49,6,169,15 

6788 DATA 157,0,120,206,43,6,174,44 
6790 DATA 6,173,50,6,157,0,130,202 
6800 DATA 189,0,130,141,50,6,169,15 

6810 DATA 157,0,130,206,44,6,174,45 
6820 DATA 6,173,51,6,157,0,137,232 
6836 DATA 109,0,137,141,51,6,169,15 

6840 DATA 157,0,137,238,45,6,174,46 
6850 DATA 6,173,52,6,157,0,110,232 
6860 DATA 189,0,110,141,52,6,169,15 

6870 DATA 1S7, O, 116, 238, 46, 6, 174, 47 
6688 DATA 6,173,53,6,157,6,125,232 
6890 DATA 189,0,125,141,53,6,169,15 

69O0 DATA 157,0,125,238,47,6,76,4 

6910 DATA 30,162,8,160,88,169,8,157 

6928 DATA 0,78,157,0,79,157,0,80 

6930 DATA 157,0,81,157,0,82,157,0 



<CA> 6946 DATA 

24 

<FF> 6950 DATA 

169 

<CE> 6968 DATA 

45 

<ND> 6970 DATA 

65,113 

<FJ> 6988 DATA 

224 

<DB> 6990 DATA 



86,152,157,0,03,200,232,2 
40,208,226,169,0,133,112, 
87,133,113,169,0,160,23,1 
112,200,145,112,230,113,1 
201, 143, 208, 239, 76,0, 183, 
2,227,2,78,140,168,140 




Ende des Listings 




Da der Winter in deutschen Landen kein En- 
de zu nehmen scheint, sollen auch unsere 
TI- Freunde in den Spielgenuß von Biathlon 
kommen. 

Klemmen Sie den Joystick in Port 1, und 
geben Sie den Namen und die Nationalität 
des Spielers ein, nachdem das Programm 
gestartet hat. 

Jetzt kann's losgehen. Sie sind auf der lin- 
ken Bildschirmseite. Durch rechts-links- 
Bewegungen des Joysticks schiebt sich Ih- 
re Spielfigur nach rechts. Haben Sie den 



rechten Bildschirmrand erreicht, kommen 
Sie ins nächste Bild. Die gesamte Route be- 
inhaltet fünf verschieden Bilder, die insges- 
amt dreimal durchfahren werden müssen. 
Die sehr gute Grafik und der sehr schnelle 
Aufbau der verschiedenen Screens zeich- 
nen dieses Programm aus. Im wesentli- 
chen haben Sie bei diesem Spiel mit zwei 
Schwierigkeiten zu kämpfen. Zunächst 
müssen Sie den richtigen Rhythmus der 
Bewegungen finden, da es nichts nützt, den 
Joystick wie ein Wilder von rechts nach 



links zu fetzen. Desweiteren müssen Sie 
blitzschnell umschalten können, wenn Sie 
keuchend an den Schießstand kommen. Je- 
der Fehlschuß kostet Sie nämlich zehn Se- 
kunden. 

Die Jagd auf die Bestzeit kann also begin- 
nen. 

Steuerung: 

Joystick links/rechts - Bewegen des Spie- 
lers 

Joystick hoch - Schuß laden 
Joystick runter - bücken (Abfahrt), Schuß 
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„Immerhin hat der alte Angeber Recht behalten: Er 
hat mit geschlossenen Äugen ins Schwarze getroffen!" 



Das Listing 



100 ! B I A T H L N 

110 ! HOLGER SCHAEFER BERLIN 

ER STR. 18 6062 MOERFELDEN 

120 0-1 :: DIM A(30) 

130 HIM=4 : : HITI-60 

140 CALL CLEAR :: CALL SCREEN<2) : : CALL 

MAGNIFYO) 

150 FOR C«3 TO 8 :: CALL C0L0R(C, 16,2) : : 

NEXT C 
160 DISPLAY AT(9,8):"B I ATHLON" :: 

DISPLAY AT(20,12) : "TC SOFT" :: FOR P-l 
TÖ 250 : : NEXT P : : CALL CLEAR : : GOTO 4 
50 

170 DATA FFFFFFFFFFFFFFFF,FF819989898981 
FF, 8080808080808080, 0101010101010101 
180 DATA 00000001070FOF1F,1F1FOFOF070100 
00 , O00OO0C0FOF8F8FC , FCFCF8F8F0COO0OO 
190 DATA OOOOOOOOFFOQOOFF.Q0030C30C30C30 
CO , C30C30C0OOOOOOO0 , 0000000000030C30 
200 DATA OOOOOOOOC0300CC3,300C0300000000 
00, C0300CC330QC0300, 8040201008040201 
210 DATA 001C22262A32221C, 00081808080808 
1C,001C22020C1G203E,003E02040C02221C 
220 DATA 00040C14243E0404,003E203C020222 
IC, 000E10203C22221C, 003E0204Ö8101010 
230 DATA 001C22221C22221C001C22221E0204 
38, 0000100000100000, OOFFFFFFFFFFFFFF 
240 DATA C78301010183C7FF, 00000000000000 
00,0000000000000000,0000000000000000 
250 DATA FFFFFFFFFFFFFFFF.163C7E66667E66 
66,7C7E66667C66667E,3C7E666060667E3C 
260 DATA 787C6E66666E7C78,7E7E607C7C607E 
7E , 7E7E607C7C606060 , 3C7E66606E667E3C 
270 DATA 6666667E7E666666, 18181818181818 
18,7E7E0606066E7C38,666E6C787C6E6666 
280 DATA 6060606060607E7E,63777F7F6B6363 
63,63737B7F6F676363,3C7E666666667E3C 



290 DATA 7C7E667E7C606060.3C7E66666E667E 
3D , 7C7E667E7C6C6666 , 3C7E66300C667E3C 
300 DATA 7E7E181818181818,6666666666667E 
3C6363637777363E1C6363636B6B7F7F36 
310 DATA 6363763E3E776363,666666663C3C18 
18,7E7E060C18307E7E,FFFFFFFFFFFFFFOO 
320 DATA 000000000305080D, 08050300000000 
00 , 0000000080402060 , 2040800000000000 
330 DATA 181818187EA92400,181838540A0800 
00, 1010385400000000, 1818183C5E952402 
340 DATA 000000071F3F3F7F.FFFF7F7F3FOF07 
OO.OOOO0OO0EOFCFEFE.FFFFFEFEF8E0COOO 
350 DATA FFFFFFFFFFFFFFFF,FFFCFOCOO00000 
00 , FFFFFFFFFFFCFOCO , FF7F3F1F0F070301 
360 DATA 0303030103030303, 070A12244F0404 
FF , 80C03000C0B08888 , 88884841FE0010E0 
370 DATA 18183C3C3C7E7EFF,01010303070F3F 
7F , 8080C0C0EOF0FCFE , FFFFFFFFFFFFFFFF 
380 DATA 01010303070F1F3F,8080COCOEOFOF3 
FC,0101030307070F1F,8080COCOEOEOFOF8 
390 DATA 0102040810204080, FF0O00O00O0O00 
00 , C020100804030C31 , 030C1020FF8080FF 
400 DATA 0303030103030307, OB1224O4FFOO00 
OF, 80C0800080COA098, 84848454E44441FE 
410 DATA 0303030103030303, 060A14270C30C3 
04, 80C08000E09Ö8884, AOA1C34C70COOOOO 
420 DATA 0101010001010305, 0810O0O3OCÖ003 
OC,COEOC080COFOC8C4,CEF1C48CBOCOOOOO 
430 DATA 030303011F031F03.1AOD631A060100 
00 , 80C0800080COE080 , 808080601887601C 
440 DATA 0000041209050303 .'lAOeeSlAOeOlOO 
00,70787020FOFODOFO,808080601887601C 
450 RESTORE 170 : : FOR Z-32 TO 143 : : RE 
AD Z$ :: CALL CHAR(Z,Z$):: NEXT Z 
460 CALL COLOR(1,2,16,2,15,16,9,14,16,10 
,6,16,11,3,16,12,15,16) 

470 B$ ( 1 ) «"hhhhhhhhhhhhhhhhhhhhhhhhhhhhh 
hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh 

@g@" 

480 B$ (2) «"@@p@@(3@@@p@@p@§@@@@@p@@@@@@@@ 

vsw@p@@vswvsw@p@@@vsw@@@@p@@vswvsw@tsuvs 

wvsw@@tsu@p@vsw@tsuvsw§tsutsuvsw@@tsuvs^ 

vsw" 

490 B$ (3) ="@qsrtsu@qsrtsutsu@@qsrtsutsu@ 

qsrqsr@qsrqsrqsr@@qsrqsrqsr@@c@(a'''@@@c@i3'' 



500 B$ (4) -"((((((((<((<(((((<(<(<((((( (© 

@@@" 

510 c$ ( 1 ) - "hhMihhhhhhhhhhhhhhhhhhhhhhhhh 
hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh 
hhhhhhhhhhhhhhhhhhhhhhhhhj i /@@@@@<a@@@@@@ 

520 C$ ( 2 ) - "hhhhhhhh j i @P@/@@@@@@@@@@@@@@h 
hhhhhj ip@@b@@z {[((((((({(( (hhhhj i@@b@@@+ 
) */@@@@@@@@@@@@hhj i@@@@©@+) *@§@/@@@@@@@p 

530 C$ (3) «" j i@@§@@@+) *@p@@<a@/@@@<a@v3w@@@ 
@<a@@@+) *@@vsw@@@@/@@@@tsu(a<a@@@@+) *@@@@ts 



^mputronic 



75 



1 NS T T R&TS 



u@@@@@/@p@tsu@@@@+) * @@@@©@qsr@@@@@@/a@qs 
540 C$ (4) -"+) *@@<a@<a@@@@c@@@<a@@@@/@@^@@<a* 
@@@@@@@@@§/@@@(a@@@@@(a@@@<a@@@@@@@@@@@@@@/ 



550 D$ ( 1) ="hhhhhhhhhhhhhbhhhhhhhhhhhhhhh 
hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh 
hhhhhhhhhhhhbhhhhhhhhhhhhhhhhhhhhhhhhhhh 

hhh" 

560 D$ (2) ="@<a(a@@@@@@@@@@@@ia@@@©@@<a<a@@§@@ 

@@p@@@@@p@@@p§@@@@@p@@@@P@@§@VSW@@@VSW@V 

sw@p@@@b@@pvsw@@@vsw@@@tsu@tsuvsw@@@@@av 

sw@ M 

570 D$ (3) ="@@tsu@@@qsr@@a@tsu@@@@@@tsu@@ 

@qsr@@@qsr@@@@tsu@@@@@@qsr@@@qsr@@@@c@@@ 

@@qsr@@@@@@@c@@@@@~@@@@@@@@@@@@"@@@@@@@@ 



580 D$ (4) -"(((((((( t ((((((((((( C (((((( (© 
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ 

590 E$ ( 1 ) = " hhhhhhhhhhhhhhhhhhhhhhhhhhhhh 
hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh 
hhhhhhhhhhhhhhh , @@@@@@§@@@@@§@@@@@@khhhh 

hhh" 

600 E$(2)=»"-. , @@@@@@@@@@@@@P@@@§3<hhhhhh@ 
@- . , @@@@@@@@@@@b@@@©@khhhhh@@@@- . , @@@P@@ 
@@<a@@p@@@@)chhhh@@@@@@- . , @a@p@@@@@b@@@@xy 

yyy" 

610 E$ ( 3 ) - " @@@p@@@p- . , @a@@@@@@@@@x@@@@@@ 
@vsw@vsw@- . , @@@@@@@@x@@@@@@@@tsü@vsw@@@- 
- ,@@@@@x@@@@@@@@@tsu@tsu@@@@@-. ,@@x@@@@@ 

620 E$ (4) «"@@qsr@tsu@@@@@@@- .{(((((((( (6 
@qsr@qsr@@@@@@@@x@@@@@@@@@@@@@^@@@c@@@@@ 
@<&iax@@@@@@@@@@@@@@@@@@@@@@@@@@x0@@@@@@@@ 



630 F$(2)«"@@@@@@@@@@@t t [! [[ t@@@@@@@@@@P 
@@P@@P@@P#@@@@@@#@P@@P@@P@@b@@b@@b@@b#@@ 
@@@@#@b@@b@@b@@@@@@@@@@@@#@@@@@@#@@@@@@@ 

640 F$(3)«"@@@@@@@@@@x; ; j ; ; ; ; /@@@@@@@@@@ 
@@@@@@@@x§@@@@@@@@/@@§@@@@@@@@@@@@@x@@§@ 



650 F$ (4) -"@@@@@@X@@@@@@@@@@@@@@@/@@@@@§ 

y@y@y@y@y@yy@@@@@@@@@@@@@@@@@@@@@@@@@@@@ 
@@@" : : CALL CLEAR 
660 ! SPIELBEGINN 

670 DISPLAY AT(18, 1) : "NAME DES ATHLETEN: 
" :: ACCEPT AT<20, 1) SIZEC15) VALIDATE(UAL 
PHA) :NAM$(A(0)) :: IF NAM$ (A(O) ) -" " THEN 
670 

680 DISPLAY AT(22, 1) : "NATION: " :: ACCEPT 
AT(22,10)SIZE(3)VALIDATE(UALPHA) :NAT$(A 
(O)):: IF NAT$(A(0))-"" THEN 680 
690 CALL HCHARC 1,1,32,704) 
700 U-10 :: BILD-1 :: TI ,M-0 :: DISPLAY 
AT(22,25)SIZE(4) :"0:00" 
710 DISPLAY AT(2.7> : "B I ATHLON" : : 



DISPLAY AT (20, 11) : "TC SOFT" :: DISPLAY 
AT(22,1)SIZE(15) :NAM$(A(0)) : : DISPLAY AT 
(22,18)SIZE(3) :NAT$(A(0)) 
720 ON BILD GOTO 880,910,940,970,1000 
730 FOR W-l TO 500 : : NEXT W : : CALL SPR 
ITE<#1,P,2,H,20) : : U=U+8 :: GOSUB 1480 
740 ON BILD GOTO 890,920,950,980,1010 
750 IF M<-HIM THEN 760 ELSE 810 
760 IF TK-HITI THEN 780 ELSE 810 
770 FOR Z-l TO 300 : : NEXT Z 
780 HIM-M :: HITI-TI :: DISPLAY AT(24,1) 
SIZE(15) :NAM$(A(0)) : : DISPLAY AT(24;18)S 
IZE(3) :NAT$(A{0)) : : DISPLAY AT(24,25)SIZ 
E(l) :USING "#":M 

790 DISPLAY AT(24, 26) SIZE(l) : " : " :: IF T 
I< 10 THEN 800 ELSE DISPLAY AT( 24, 27) SIZE 
(2):USING "##":TI :: GOTO 810 
800 DISPLAY AT(24,27)SIZE(2) rUSING "0#": 
TI 
810 FOR Z-l TO 1000 :: NEXT Z :: DISPLAY 

AT(22,1)SIZE(28) : " IST NOCH EIN ATHLET A 
M START ! ' 

820 CALL KEY(0,K.S) : : IF K-74 OR K*106 T 
HEN 850 

830 IF K=78 OR K-110 THEN 860 
840 GOTO 820 

850 RU=0 : : CALL DELSPRITE ( ALL) : : CALL H 
CHARU, 1,32,704) : : 0-0+1 :: GOTO 670 
860 CALL CLEAR :: CALL DELSPRITE (ALL) : : 
END 

870 ! UNTERPROGRAMME 

880 DISPLAY AT(4,1) :B$(1) :B$(2) :B$(3) :B$ 
(4):: P-108 :: H=113 :: GOTO 730 
890 GOTO 1080 

900 CALL DELSPRITE (#1) : : BILD=BILD+1 :: 
GOTO 720 

910 DISPLAY AT(4,1) :C$(1) :C$(2) :C$(3) :C$ 
(4):: P=132 :: H=113 :: GOTO 730 
920 GOTO 1140 

930 CALL DELSPRITE (#1) : : BILD-BILD+1 :: 
GOTO 720 

940 DISPLAY AT(4,1) :D$(1) :D$(2) :D$(3) :D$ 
(4) : : P-108 : : H-113 : : GOTO 730 
950 GOTO 1080 

960 CALL DELSPRITE (#1) : : BILD-BILD+1 :; 
GOTO 720 

970 DISPLAY AT(4,1) :E$(1) :E$(2) :E$(3) :E$ 
(4) : : P-136 : : H-47 : : GOTO 730 
980 GOTO 1210 

990 CALL DELSPRITE (#1) : : BILD-BILD+1 :: 
GOTO 720 

1000 DISPLAY AT(4,1) :D$(1) :F*(2) :F$(3) :F 
$(4):: H-l :: P-136 :: GOTO 730 
1010 GOTO 1340 

1020 CALL DELSPRITE (#1) :: BILD=1 :: RU-R 
U+l ! : IF RU-3 THEN 750 
1030 GOTO 720 
1040 IF TK10 THEN 1070 :: IF TI-60 THEN 

1050 :: DISPLAY AT (22 , 27) SIZE (2) :USING 
"##":TI :: RETURN * 
1050 TI-0 :: M-M+l :: IF M>9 THEN 1060 : 

: DISPLAY AT(22, 25) SIZE(l) :USING "#" :M : 
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: DISPLAY AT(22, 27) SIZE(2) ; "00" :: RETUR 

N 

1060 DISPLAY AT(22,24)SIZE(2) :USING "##" 

:M :: DISPLAY AT(22 , 27) SIZE (2) : "00" :: R 

ETURN 

1070 DISPLAY AT(22,27)SIZE(2) :USING "0#" 

:TI : : RETURN 

1080 CALL JOYST(l,X,Y) : : IF X=4 THEN 112 

ELSE GOSUB 1100 :: GOTO 1080 

1090 CALL JOYST<l,X,Y) : : IF X=-4 THEN 11 

30 ELSE GOSUB 1100 : : GOTO 1090 

1100 TI-TI+1 : : GOSUB 1040 : : FOR Z-l TO 

60 : : NEXT Z : : RETURN 
1110 CALL POSITION(#l,X,Y) 
RETURN 

MOTION (#1,0, 13) : 
; CALL SOUND (160, 123, 22 , -5.23) : 
TO 35 : : NEXT Z : : CALL MOTION 
; GOSUB 1100 :: GOSUB 1110 :: G 



IF Y>225 TH 



CALL PATTERN 



EN 900 : : 

1120 CALL 

(#1,124) : : 

: FOR Z-l 

(#1,0,0) : ; 

OTO 1090 

1130 CALL 

(#1,108) : : 

: FOR Z-l 

(#1,0,0) : ; 

OTO 1080 

1140 CALL JOYST(l,X.Y) : : IF X-4 THEN 118 

ELSE GOSUB 1160 : : GOTO 1140 

1150 CALL JOYST(l,X,Y) : : IF X=-4 THEN 

90 ELSE GOSUB 1160 :: GOTO 1150 

1160 TI-TI+1 ;: FOR Z=l TO 60 :: NEXT 

: : GOSUB 1040 : : RETURN 

1170 CALL POSITION(#1,X,Y) : : IF Y>121 

; RETURN 
MOTION (#1,-4, 8) : : CALL PATTERN 

: CALL SOUND (100, 123, 22,-5, 18) : 
TO 34 ;: NEXT Z r: CALL MOTION 

: GOSUB 1160 :; GOSUB 1170 :: G 



MOTION(#1,0,13) : : CALL PATTERN 
: CALL SOUND (160, 123, 22,-5,23): 
TO 35 :: NEXT Z :: CALL MOTION 
i GOSUB 1100 :: GOSUB 1110 :: G 



11 



TH 



EN 1200 : 
1180 CALL 
(#1,128) : 
: FOR Z-l 
(#1,0,0) : : 
OTO 1150 
1190 CALL 
(#1,132) : : 
: FOR Z«l 
(#1,0,0) : : 
OTO 1140 
1200 CALL 
RNC#1,108) 
1210 CALL 
1220 CALL 
50 

1230 L*=L+1 
E 1320 
1240 GOTO 



MOTION (#1,-4, 8) : : CALL PATTERN 
CALL SOUND(100,123,22,-5,18) e 

TO 34 : : NEXT Z : : CALL MOTION 
GOSUB 1160 :: GOSUB 1170 :: G 

LOCATE (#1,57, 128) : : CALL PATTE 
: : GOTO 1080 
M0TI0N(#1,4,8) : : L-0 
JOYST(l,X,Y) : : IF Y— 4 THEN 12 



IF L-2 THEN GOSUB 1310 ELS 



1250 CALL M0TI0N(#1,8,16) : : CALL PATTERN 

(#1,140) : : GOTO 1270 

1260 CALL POSITION(#l,X,Y) : : IF Y>146 TH 

EN 1290 : : RETURN 

1270 L-L+l : : IF L-2 THEN GOSUB 1300 ELS 

E 1330 

1280 GOTO 1270 

1290 CALL MOTION(#1,0,0) : : CALL L0CATE(# 



CALL PATTERN (#1,108) 



GOTO 



1220 



1,113,152) 

1080 
1300 L-0 :t TI-TI+1 :: GOSUB 1040 ;: RET 
URN 

1310 L*0 :: TI-TI+1 :: GOSUB 1040 :: RET 
URN 

1320 FOR Z=l TO 37 : : NEXT Z : : GOSUB 12 
60 : : GOTO 1220 

1330 FOR Z-l TO 23 : : NEXT Z : : GOSUB 12 
60 : : GOTO 1270 

1340 CALL HCHARdO, 15,60,5) : : HO=101 
1350 FOR S-3 TO 8 : : H0=H0+8 : : IF S-8 T 
HEN 1450 

1360 CALL JOYST(l,X,Y) : : IF Y«4 THEN 137 
ELSE GOSUB 1440 : : GOTO 1360 
1370 CALL SPRITE(#2,92,15,50,HO,17+RU,0) 
1380 CALL JOYST(l,X,Y) : : IF Y— 4 THEN CA 
LL MOTION (#2, 0,0) :: GOTO 1400 ELSE BILD« 
BILD-1 :: IF BILD=1 THEN 1460 
1390 CALL POSITION(#2,X,Y) : : IF X>78 THE 
N 1370 ELSE 1380 

1400 CALL SOUND(83, 110,0,-7, 10) : : CALL P 
OSITION(#2,X,Y) : : IF X>65'AND X<72 THEN 
1430 ELSE 1410 

1410 CALL DELSPRITE(#2) : : FOR 1*1 TO 10 
:: TI-TI+1 :: GOSUB 1040 :: NEXT I 
1420 NEXT S 

1430 FOR Z=l TO 70 : : NEXT Z : : CALL SOU 
ND(83, 147,7) : : CALL DELSPRITE (#2) : : CALL 

HCHARdO, 12+S, 64) : : GOTO 1420 
1440 TI=TI+1 :: GOSUB 1040 :: FOR Z-l TO 

80 : : NEXT Z : : RETURN 
1450 GOTO 1020 

1460 BILD-5 :: TI-TI+1 :: GOSUB 1040 :: 
GOTO 1390 

1470 ! SONNE, WOLKE 
1480 CALL SPRITE(#11,36,11,30,U) 
1490 CALL SPRITE (#10, 100, 15, 31, U+(U*. 4)+ 
10) 
1500 RETURN 

Ende des Listings 



Snackimacy 

Der Pillenknick 




Als ein kleiner Verwandter von Pac-Man, mit 
dem Namen Snackimacy, befinden Sie sich 
in einem Paradies von Pillen. Paradies, weil 



Sie Ihre Artgenossen so richtig auf den Ge- 
schmack gebracht haben. Zur Zeit gibt es für 
Sie einfach nichts Köstlicheres als Pillen. 



Kein Wunder, daß Sie sich wie ein Wilder auf 
die kleinen runden Dinger stürzen, und Sie 
bis auf die Letzte vertilgen wollen. 
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Aber leider birgt dieses Paradies Vorteile 
und Nachteile. Zu Häuf fliegen über die- 
sen Leckereien Pfeile umher. Diese spit- 
zen Teile trachten Ihnen nach dem Leben. 
Sie könnten den Pfeilen zwar ununterbro- 
chen ausweichen, wenn es da nicht noch 
dieses lästige Zeitlimit geben würde. Trau- 
rig, aber wahr! Die größte Gemeinheit ver- 
birgt sich allerdings hinter den Riesenpil- 
len. Schweren Herzens muß Snackimacy 
diese Kostbarkeiten stehen lassen, weil er 
daran ersticken würde. 
Doch im Zeitalter der Technik hat auch der 
kleine Vielfraß seine Möglichkeiten. Unter 
den vielen kleinen Mahlzeiten befinden 
sich auch drei Superpillen innerhalb eines 
Levels. Verspeisen Sie eine davon, können 
Sie nicht nur die Pfeile ignorieren, sondern 
auch die Riesenpillen vertilgen. Desweite- 
ren können Sie mit der Joysticktaste 1 den 
Verschwindibus aktivieren, falls die Lage 
einmal arg brenzlig sein sollte. Also ist 
kein Grund zur Panik vorhanden! 
Aufpassen müssen Sie trotzdem! Von Le- 
vel zu Level (insgesamt 10) steigt nämlich 
der Schwierigkeitsgrad, indem die Pfeile 
schneller werden, die Riesenpillen sich ra- 
pide vermehren und die Zeit immer knap- 
per wird. Viel Glück! 
Zur Eingabe: 

1. DRAW-Programm eingeben und mit 
BSAVE SNACHIMACY.DRAW,A§7- 

FAE,L§1652 abspeichern. 
2. START- Programm eingeben und mit 
SAVE SNACKIMACY.START abspei- 
chern. 

3.TITEL-Programm eingeben und mit SA- 
VE SNAGKIMACY.TITEL abspeichern. 
4. SPIEL-Programm eingeben und mit SA- 

Das Listing: 



T E I L 1 



10 REM «*«#********»»*«******•* 

15 REM * # 

20 REM * SNACKIMACY *■ 

25 REM * ■ , * 

30 REM * START » 

35 REM * * 

40 REM #*»*»»*##»**##*****##### 

45 REM * • 

50 REM « WRITTEN BY # 

55 REM # * 

60 REM * FRANK WANGER * 

65 REM * DUERKHEIMER STR. 2fl # 

70 REM * 6700 LUDWIGSHAFEN # 

75 REM # • 

SB REM * (C) I9B6 FW-SQFTWARE # 

BS REM * * 

90 REM *»******##**#•«###**#*## 

95 REM 
100 TEXT s HOME : NORMAL * NDTRACE 

: CLEAR e RESTORE s SPEED= 2 

55 e ONERR GOTO 100 



VE SNACKIMACYSPIEL abspeichern. 
5. Programm mit RUN SNACKIMACY.- 
START aufrufen. 
Hinweise: 

-START-Programm: Es ist ratsam, den Be- 
fehl POKE 1012,0 erst dann einzugeben, 
wenn alle Programme lauffähig eingetippt 
wurden. Dieser Befehl verursacht beim 
Drücken von RESET ein Booten der Dis- 



kette. 

-SPIEL-Programm: Bitte in diesem Pro- 
gramm nicht die Zeilennummern verän- 
dern, da einige von diesen durch das Ma- 
schinenprogramm DRAW aufgerufen wer- 
den. 

-DRAW-Programm: Die Daten von §89E9 
bis §932C brauchen nicht eingegeben zu 
werden. Dies ist leerer Speicherplatz. 




„Das letzte Snackymacy. Da muß man schon auf Nummer sicher gehen!'* 

i>®®®®®®®®®®®®®®®®® 



110 



120 



D®®<§ 



10 


REM 


15 


REM 


20 


REM 


25 


REM 


30 


REM 


35 


REM 


40 


REM 


45 


REM 


50 


REM 


55 


REM 


60 


REM 


65 


REM 


70 


REM 


75 


REM 


00 


REM 


85 


REM 


90 


REM 



POKE 1012,0t POKE 103,1t POKE 
104,64* POKE 16304,0 
PRINT CHR* <4>j"RUN SNACKIM 
ACY. TITEL" 



T EI L 2 



* # 

* SNACKIMACY * 

* » 

* TITEL # 

* « 

* WRITTEN BY » 

* * 

* FRANK WANBER * 

* DUERKHEIMER STR. 20 * 

* 6700 LUDWIGSHAFEN * 

* ♦ 

* (C) 19B6 FW-BOFTWARE * 

* * 



95 

100 



110 

120 

130 
140 
150 
160 
170 
160 
190 
200 



REM 
TEXT I HOME t NORMAL i NDTRACE 
1 CLEAR 9 RESTORE i SPEED« 2 
55i ONERR GOTO 100 
POKE 2B,0i POKE 230,321 CALL 
62454: POKE 49239,01 POKE 49 
236,0» POKE 49234,01 POKE 49 
232.0 
IN VERSE ■ PRINT » 



's 

PRINT "! 
i 

PRINT "! 

PRINT "". 
t 

PRINT a '! 
PRINT ."! 
RRINT »! 
PRINT "! 
PRINT "! 



■ t "l 

i jii. 


1 t M - 

! ! '*! 

1 ' "t 

i i ij. 


» i ■■ * 
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210 
22« 
230 

240 
250 
260 
270 
280 
290 
300 
310 

320 
330 
340 
350 

360 



370 

360 
390 
400 
410 
420 
430 

440 



PRINT "! 

PRINT 

PR1NT 

print" 

I 

PRINT " I 
i 

PRINT "! 
t 

PRINT " ! 

PRINT 

PRINT "! 

PRINT" 

NORMAL I PRINT " 



t 



t * 
i 



PRINT "! ! 

PRINT "! __ _!. 

PRINT " 
i 

PRINT ~__ 

!— "1 

POKE 49233,0» FOR I - 1 TG 1 
50Bi NEXT II HTAB li FGR I * 
1 TO 12i VT AB li CALL 64660c 

VTAB 25-1* CALL 646601 NEKT 
l! POKE 49232, 0e FGR I = 1 TO 
300e NEXT I 
VTAB 9i PRINT " 



* 

PRINT " 

PRINT " 



\ 
/ 

/ 



\ / \ / 
\ / 



PRINT » /\_ 
/ \ / \ / / 
PRINT " / 
/\ // // \ 
PRINT / / 

\_ / / \ / 

POKE 49233,0a FOR I = 1 TO 1 

000: NEXT I: HOME t POKE 492 

32,0s FGR I - 1 TO 300» NEXT 

I 

INVERSE 1 PRINT "*#-**#*#**** 



530 



540 



550 



CE BAR TO PLAY"i PRINT " 

PRESS ESCAPE TO END";i 

VTAB lc POKE 49233,0 
IF PEEK (49152) * 155 THEN 

POKE 49168,01 PRINT CHR* ( 
13) | CHR* <4)|"PR#6"! CHR* < 
13> 

IF PEEK (49152) < > 160 THEN 
530 
POKE 49168,09 PRINT » PRINT 

CHR* <4)|"BRUN SNACKIMACY.D 
RAW'i PRINT CHR* <4> I "RUN S 
NACKIMACY. SPIEL" 



T E I l 



450 


PRINT "# 


#», 


460 


PRINT "* 


#"l 


47B 


PRINT "* 


S N A C K I 




M A C Y 


#», 


488 


PRINT "« 


#", 


49« 


PRINT "* 


#», 


50« 


PRINT ■#**«#* 


t***#*#*#******* 



510 VTAB U i PRINT " 

MRITTEN BY"i PRINT 1 PRINT 
" FRANK WANGER" 

t PRINT " DUERKHEIME 

R STRASSE 28": PRINT " 
6700 LUDWIGSHAFEN*' 
520 VTAB 19i PRINT " COPYRIGHT 

<C) 1906 BY FW-50FTWARE"! VTAB 
23t PRINT " PRESS SPA 



10 
15 

20 
25 
30 
35 
40 
45 
50 
55 
60 
65 
70 
75 
80 
85 
90 
95 
100 



110 

120 



130 

140 
150 
160 

170 

180 

190 

200 

210 
22H 
230 



REM #»***#**##»»*»»*»»****»* 
REM * * 

REM * SNACKIMACY * 
REM * * 

REM » SPIEL * 

REM * * 

REM ****#*#»»*#*#*#*»***#*** 
REM * » 

REM * »RITTEN BY * 
REM * * 

REM # FRANK WANBER * 
REM * DUERKHEIMER STR. 28 » 
REM * 6700 LUD WISSHAFEN * 
REM * * 

REM * <C> 1986 FW-SOFTWARE « 
REM * * 

REM ****#**»*#*********#*#»* 
REM 

TEXT I HOME I NORMAL I NOTRACE 

S CLEAR : RESTORE x SPEED« 2 

55 ■ ONERR GOTO 100 

Sc INT 
S* =« "063087F0C7F1E7F3E7F3F7F 

7F7F7F7F7F7F7E7F3E7F3C7F187F 

00630"! Sc INPUT S* ON 2,14 TQ 

1 
S* = "0630S7F0C7F1B7F307F306F 

704F704F 706F7B7F3B7F3C7F 1 87F 

00630"! * INPUT S* ON 2,14 TO 

2 
S* « "B63087F0C7F1E7F0E770F73 

0F7 1 0F7 1 0F730E770E7F0C7F 1 87F 

00630"! Sc INPUT S* ON 2,14 TO 

3 
S* = "008000004001 E083E1C3F3E 

7F7F7F7F7F7F7E7F3E7F3C7F 187F 

00630"! fc INPUT 8* ON 2,14 TD 

4 
S* = "063BB7F0C7F1E7F3E7F3F7F 

7F7F7F7F7F3E7E 1C3E083400 1 000 

08000"! & INPUT 5* ON 2,14 TO 

5 
S* « •'07000B00C30B0470F7F7F71 

0C30004700700000B"i Sc INPUT 

S* ON 4,5 TO 6 
S* = "00008308F0000710C7F7F77 

0F000B7 1000008300**1 Sc INPUT 

S* ON 4,5 TO 7 
S* « »4048EBEBF1F151 404040404 

04040404040404040E0E0A0A0" i «t 
INPUT S* ON 1,24 TO 8 
S* = "A0A0E0E04040404040404B4 

B404B4B404051F1F1EBEB4B48"I Sc 
INPUT B* ON 1,24 TO 9 
S* = "6000F000F0006000"t 1t INPUT 

S* ON 2,4 TO 10 
S* = "C0E13333E1C0"* Sc INPUT 

5* ON 1,6 TO 11 
S* «= ,r C770E7FßF7FlF7FiF7FlF7F 

1F7F1F7F1F7F1F7F1E7FBC77B"i & 
INPUT S* ON 2,12 TO 12 



Computronic 



240 S* « »F300B0BBB0300BB0000830F 
3F3F3F3F33333333303303330F3B 
333333830F3F3F330F3" 1 Sc INPUT 
S* ÜN 5,7 TO 13 
250 S* = "F330000BC0000B00C0B7F3F 
3C0B 1 3333C0B1 33F3C0B i 033BC0B 
103F3"! St INPUT B* ON 4,7 TG 
14 
260 S* » "30000BB0303B00000B3030F 
333F33038333333303BF333F33B3 
030E13030F3F3C0F330"! St INPUT 
S* ON 5,7 TO 15 
270 S* = "30300B00003000B00BBB30B 
1B7B73030B1B1B10B30B1B7B73B3 
037910030F336B7B730"! It INPUT 
S* ON 5,7 TO 16 
280 S* = "8730C77BA7B070C170C170C 
170C170C170C12080000B2B8B70C 
170C170C170C170C170C1A7B0C77 
0B730 ,, -. Sc INPUT S* ON 2,21 TO 
17 
290 B* =■ "000080000B8B00C108C100C 
I BBC 1 00C1 BBC 1 008B0000008000C 
100C100C100C100C100C10080"t Sc 
INPUT S* ON 2,19 TO 1B 
300 S* = "B73BC770B7B000C100C100C 
10BC 1 BBC 1 B0C 187BBC77BA730700 
070BB7000700070007000A730C77 
88730"! «t INPUT 5* ON 2,21 TO 
19 
310 S* = "8730C770B7B0B0C1B0C100C 
100C108C1BBC1B7B0C770B7B0BBC 
10BC100C1BBC100C100C1S7B0C77 
08730"! St INPUT 8* ON 2,21 TO 
20 
320 S* « "000B008020S070C178C170C 
1 70C 1 70C 1 7BC 1 A7B0C770B7B000C 
1B0C100C100C100C100C10080"I Sc 
INPUT S* ON 2,19 TD 21 
330 S* - »8730C770A7307000700B700 
078007BBB700BA73BC77087B00BC 
10BCiflBClBBClB0ClBBClB7B0C77 
08730"» Sc INPUT S* ON 2,21 TO 
22 
340 S* = "B730C770A7307B007000700 
07BB070B07000A730C770A7B070C 
1 70C 170C 1 70C 1 70C 1 70C 1 A7B0C77 
08730"! «i INPUT S* ON 2,21 TO 
23 
350 S* = "B73BC770S7B00BC100C100C 
1 00C 1 00C 1 00C1 08B00000008000C 
1 00C 1 0BC 1B0C100C100C 10080"! Sc 
INPUT S* ON 2,19 TO 24 
368 S* = "8730C770A7B07BC170C170C 
1 70C 1 70C 170C1 A7B0C770A7B070C 
1 70C 1 70C 1 70C 1 7BC 1 7BC 1 A7B0C77 
0B730"! St INPUT S* ON 2,21 TO 
25 
370 S* = "8730C770A7B070C170C170C 
1 7BC 1 70C 170C 1 A7B0C77BB7B000C 
1B0C1BBC100C1BBC180C187B0C77 
BB730": Sc INPUT S* ON 2,21 TO 
26 
400 CLEAR I ONERR GOTO 400 
41B DIM PK17.9) 
450 LE = 0:LI =3 
460 FOR I « 960 TO 975: POKE 1,0 

l NEXT I» POKE 8191,0 
5BB HGR » POKE 49234, 0i HCOLOR= 
3l HPLOT 0,0 TO 279,0 TO 279 
,168 TO 0,168 TO 0,03 FÜR I - 

169 TO 191! HPLOT 0,1 TO 279 
,Ii NEXT I 

602 Sc DRAW £13 AT 2, 183i St HLIN 
#17 AT 39,170 STEP Si Sc DRAW 
#14 AT 115,183 St #17 AT 145, 

170 Sc #17 AT 159,170 Sc #15 AT 
179,183 Sc #17 AT 212,170 St # 
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16 AT 233,183 Sc #20 AT 266,1 

70 
SÖ5 POKE 968, 0s POKE 969, 0t POKE 

970, INT (4 * RNO Cl>) * 2l 
PDKE 971, INT (18 # RND (1 

)) * 14 + 14: POKE 972, INT 

(10 * RND (1)) * 14 + 14: POKE 

973,1: POKE 974, 01 POKE 975, 

177 
506 LE* * MID* C"0»,l,2 - LEN ( 
STR* (30 - LE * 2> ) > + STR* 

(30 - LE * 2): PDKE 729B, VAL 

( RIGHT* (LE*,l))s POKE 7299 

, VAL ( LEFT* (LE*,1)): CALL 

35062 
510 FOR I =IJ TB 17i FOR Jt » TO 

9s ON PHI,J) + 1 GOTO 540,5 

40,520,530 
520 St DRAW #11 AT 1 * 14 + 1B,J 

* 14 + 18: GOTO 540 

330 St DRAW #12 AT I * 14 + 15, J 
»14+15 

540 PKI,J) « 1: NEXT Jt NEXT I 

550 FOR I = TO 9i St HLIN #10 AT 
19,1 * 14 + 19 STEP 18: NEXT 
II FOR I «= TO 2 

560 X0 = INT (18 * RND (1)> » 1 
4 + 14: V0 = INT (10 * RND 
<1)> » 14 + 14: IF XB = PEEK 
(971) AND Y0 * PEEK (972) THEN 
560 

570 St DRAW #10 AT X0 + 5,Y0 + 5 
& #11 AT X0 + 4,V0 + 4:PI(X 

/ 14 - 1,V0 / 14 - 1> = 2l 
NEXT I 

618 FOR I -= TO 3: S. STORE #6 AT 
256 * RND <1),140 # RND (1 
) + 14 STEP 254 - LE * 2,0 TO 

1 & #7 AT 256 » RND (1),140 

* RND (1) + 14 STEP LE * 2 
+ 2,0 TO I + 4 

62® & STORE #8 AT 238 # RND (1 
) + 14,192 * RND <1> STEP 
,254 ~ LE * 2 TO I + 8 St #9 AT 
23B * RND (1) + 14,192 * RND 
(1) STEP 0,LE * 2 + 2 TD I + 
12: NEXT I:. & PLOT #0 TG 15 

630 Sc DRAW #10 AT PEEK (971) + 

5, PEEK (972) + 5 St #1 AT PEEK 
(971), PEEK (972):PI< PEEK ( 
971) / 14-1, PEEK (972) / 
14-1) =0 
64» St RUN #0 TO 15: IF PEEK (4 

9249) < 128 THEN 640 
645 St NQT #100 FOR 30 Sc #80 St # 
90 Et #70 St #B0 St #60 St #70 6 
#80 St #90 St #70 St #80 St #60 St 
#40 St #30 St #20 St 
#20 St #30 St #40 St 
#50 St #40 



IF PEEK <967) = 
f<?74) » THEN St 



#70 S< #50 St 

#10 St #10 St 

#40 St #50 St 
650 CALL 34591 
700 CALL 34B2S: 

AND PEEK 
NOT #20 FOR 2 
710 IF RND (1) > (LE +1) / 20 THEN 

650 
720 XW = INT <18 » RND (1)):YW - 
INT (10 * RND (l))j IF PK 

XW,YW) < > 1 THEN 650 
730 St NOT #200 FOR 3 «t #50 St #1 

50 St #50 Sc #250: St DRAW #10 
AT XW * 14 + 19, YW »14+1 

9 St #12 AT XW * 14 + 15, YW * 

14 + 15:PKXW,YW) » 3: POKE 

975, PEEK (975) - 1: IF PEEK 

(975) = THEN 3000 
740 GOTD 650 



1030 ON PK PEEK (971) / 14 - 1, 

PEEK (972) / 14 ~ 1) + 1 GOTO 
700 , 1 040 , 1 050 , 1 070 

1040 CALL 34997:PI( PEEK (971) / 
14-1, PEEK (972) / 14 - 1) 
= 0: GOTD 700 

1050 St NOT #50 FOR 10 St #20 St # 
100 St #78 St #90 St #20 St #10 St 
#40 St #10 St #50 St #90 St #60 St 
#100 St #50: IF PEEK (974) » 

THEN CALL 3429Q 

1060 St DRAW #11 AT PEEK (971) + 
4, PEEK (972> + 4: PK PEEK ( 
971) / 14 - 1, PEEK (972) / 
14-1) = 0i PDKE 974,40 - L 
E # 3: POKE 960,1001 CALL 34 
550: GOTO 700 

1070 IF PEEK (974) > THEN FOR 

1 = TO ls FOR 3 «= 100 TO 2 

STEP - 20: St NOT #J FOR 
3s NEXT J: NEXT I: St DRAW # 
12 AT PEEK (971) + 1, PEEK 
(972) +- IsPK PEEK (971) / 1 

4-1, PEEK (972) / 14 - 1) = 

0: POKE 960,50: CALL 34550: BOTO 

700 
1080 St DRAW #12 AT- PEEK (971) + 

1, PEEK (972) + IsPK PEEK ( 

971) / 14 - 1, PEEK (972) / 

»4 - 1> * 0i GOTO 2000 
1500 IF PEEK (974) = THEN POKE 

8191,1: CALL 35097: POKE 819 

1,0t GOTO 700 
1510 St NOT #10 FDR 3* GOTO 700 
1900 St NOT #100 FDR 10 St #90 FOR 

20 St #0 FOR 100 
1910 IF PEEK (49250) < 128 THEN 

St NOT #1 FOR 1: GBTO 1910 
1920 St NOT #90 FOR 10 St #100 FOR 

20 St #0 FDR 100: GOTO 650 
2000 FOR I *= 200 TO 20 STEP - 2 

0: St NDT #(I) FOR 2 St #1 + 

10: NEXT I: FOR I «= TO 10: 
St NOT #20 St #30: NEXT Ii FOR 

1 = 20 TO 200 STEP 20s & NDT 
#(I) FOR 2 ft #1 + 10: NEXT I 

: CALL 35267 
2010 St STORE #1 AT PEEK (971), 
PEEK (972) STEP 0,249 TO St 
STEP 5,251 TO 1 St STEP 7 S 
TO 2 St STEP 3,5 TO 3 St STEP 

0,7 TO 4 St STEP 251,5 TO 5 8t 
STEP 249,0 TO 6 S< STEP 251 

,251 TD 7a St PLOT #0 TO 7s IF 
PEEK (B191) = THEN St DRAW 

# PEEK (973) 

2020 St RUN St & & fc St St & 

St St s S. PLOT #0 TO 7: St DRAW 

# PEEK (973) AT PEEK (971), 
PEEK (972): CALL 35281: POKE 

8191,0 
2030 LI = LI - lt 

8 AT 266,170 

LI > THEN 

(975) + 1: CALL 35062: GOTO 

640 
2040 St NOT #140 FOR 70 St #150 St 

#160 St #150 St #130 Sc #150 St 



fc DRAW #LI + 1 
8c #LI + 17: IF 
POKE 975, PEEK 





#170 S. #190 St #200 St #200 St 




#210 «t #200 St #190 St #200 St 




#210 St #220 St #230 St #230 St 




#220 tt #210 St #200 St #210 St 




#220 Sc #230 St #250 St #250 


2050 


IF PEEK (49249) < 128 THEN 




2050 


2060 


GOTO 400 


3000 


FOR I = 10 TO 250 STEP 10: tt 




NOT #(I) FOR 3 St #(260 - I) 



5010 



3020 



3030 



3040 



3050 



NOT #70 FOR 30 S. 
#60 St #50 St #40 S, 
#30 St #40 St #30 St 
#20 St #40 St #10 S< 
#20 St #30 St #40 St 
#100 St #60 St #70 



CALL 



: NEXT Ii S, 
#60 St #50 St 
#50 St #40 St 
#20 St #40 St 
#30 St #10 St 
#80 Sc #90 St 

St #80 

IF PEEK (974) > THEN 
34298 

St DRAW # PEEK (973) AT PEEK 
(971), PEEK (972>i St PLOT # 
TO 15: «t CLEAR 

IF LE < 9 THEN LE - LE + ii 

St DRAW #LE + 16 AT 212,170 

St #LE + 17 

IF LI < 9 THEN LI = LI + ls 

St DRAW #LI + 16 AT 266,170 

St #LI + 17 

GDTO 505 



-tfV'-ESE.L,--* 



1CALL -151 
*7F9B. 95F0 



7F9B- 
7FA0- 
7FAB- 
7FB0- 
7FBB- 
7FC0- 
7FCB- 
7FD0- 
7FDS- 
7FE0- 
7FE8- 
7FF8- 
7FFB- 
S000- 
800B- 
8010- 
8018- 
8020- 
B02B- 
8030- 
803B- 
8040- 
8048- 
B050- 
8058- 
8060- 
8068- 
8070- 
B07B- 
8080- 
B0B8- 
8090- 
B09B- 
80A0- 
B0A8- 
88B0- 
B0B8- 
B0C0- 
B0C8- 
B0D0- 
80D8- 
80E0- 
B0EB- 



FF 00 
FF 00 
FF 00 
A2 00 
DB FS 
0D D0 
DA 95 
E0 06 
85 1B 
85 46 
85 A0 
BD F5 
03 86 
A2 00 
94 F0 
C9 DE 
D0 EC 
E8 E6 
A6 19 
BD 60 
80 20 
EB F0 

85 00 

86 08 
AS Bl 
07 65 
00 AI 
38 ES 

02 E6 
07 D0 
F6 B6 
20 FB 
EA EA 
93 20 
4C 99 
EA EA 
F9 93 

03 4C 
FB E6 
46 85 
E6 E0 
86 EB 
CA F0 



00 FF 
00 FF 

00 FF 
9D 00 
A2 00 
F9 A2 
E3 95 
D0 Fl 
B5 26 

85 71 
A9 4C 
03 8E 
50 84 
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FD 20 


29 


BABB- 


EA EA EA EA EA EA EA EA . 


8C98- 


EA EA EA EA EA EA EA EA 


BB8B 


- 85 


A9 0A 


85 FD 


20 29 


85 


8A90- 


EA EA EA EA EA EA EA EA 


8CA0- 


EA EA EA EA EA EA EA EA 


8B88 


- A9 


14 85 


FD 20 


29 85 


A9 


BA9B- 


EA EA EA EA EA EA EA EA 


8CAB- 


EA EA EA EA EA EA EA EA 


8B90 


- 0A 


85 FD 


20 29 


85 A9 


14 


8AA0- 


EA EA EA EA EA EA EA EA 


8CB0- 


EA EA EA EA EA EA EA EA 


8B98 


- 85 


FD 20 


29 85 


A9 0A 


85 


8AAB- 


EA EA EA EA EA EA EA EA 


BCB8- 


EA EA EA EA EA EA EA EA 


BBA0 


- FD 


20 29 


85 60 


EA AD 


CE 


8AB0- 


EA EA EA EA EA EA EA EA 


8CC0- 


EA EA EA EA EA EA EA EA 


BBAO 


- 03 


D0 09 


20 FA 


85 20 


FA 


BAB8- 


EA EA EA EA EA EA EA EA 


BCCB- 


EA EA EA EA EA EA EA EA 


8880 


- 85 


20 FA 


85 60 


A9 03 


85 


BAC0- 


EA EA EA EA EA EA EA EA 


8CD0- 


EA EA EA EA EA EA EA EA 


BBB8 


- FE 


A9 64 


85 FD 


20 27 


85 


8ACS- 


EA EA EA EA EA EA EA EA 


8CDB- 


EA EA EA EA EA EA EA EA 


88C0 


- A5 


FD 38 


E9 14 


85 FD 


D0 


8AD0- 


EA EA EA EA EA EA EA EA 


8CE0- 


EA EA EA EA EA EA EA EA 


BBCB 


- F4 


AD CB 


03 1B 


69 05 


85 


BADB- 


EA EA EA EA EA EA EA EA 


BCEB- 


EA EA EA EA EA EA EA EA 


8BD0 


- 01 


A9 00 


90 02 


A9 01 


85 


8AE0- 


EA EA EA EA EA EA EA EA 


8CF0- 


EA EA EA EA EA EA EA EA 


BS DB 


- 32 


AD CC 


03 18 


69 05 


85 


8AE8- 


EA EA EA EA EA EA EA EA 


BCF8- 


EA EA EA EA EA EA EA EA 


88E0 


- 03 


A9 0A 


20 3D 


80 20 


50 


BAF0- 


EA EA EA EA EA EA EA EA 


BD00- 


EA EA EA EA EA EA EA EA 


88E8 


- 81 


A9 0A 


BD C0 


03 20 


FA 


8AF8- 


EA EA EA EA EA EA EA EA 


8DB8- 


EA EA EA EA EA EA EA EA 


BBF0 


- 86 


AD CE 


03 00 


12 20 


CD 


8B00- 


EA EA EA EA EA EA EA EA 


BD10- 


EA EA EA EA EA EA EA EA 


88F8 


- B6 


AD 82 


IC BD 


C6 03 


AD 


8BSSB- 


EA EA EA EA EA EA EA EA 


8D18- 


EA EA EA EA EA EA EA EA 


8900 


- B3 


IC 8D 


C7 03 


20 CD 


CJO 


8B10- 


EA EA EA EA EA EA EA EA 


8D20- 


EA EA EA EA EA EA EA EA 


8908 


- CE 


CF 03 


00 0B 


A9 B8 


85 


BB18- 


EA EA EA EA EA EA EA EA 


BD28- 


EA EA EA EA EA EA EA EA 


B910 


- 50 


A9 0B 


as 5i 


4C 41 


D9 


8B20- 


EA EA EA EA EA EA EA EA 


8D30W 


EA EA EA EA EA EA EA EA 


89SS 


- 60 


A9 03 


85 FE 


A9 64 


BS 


8B28- 


EA EA EA EA EA EA EA EA 


BD3B- 


EA EA EA EA EA EA EA EA 


B920 


- FD 


20 27 


B5 A9 


14 85 


FD 


BB30- 


EA EA EA EA EA EA EA EA 


8D40- 


EA EA EA EA EA EA EA EA 


B92B- 


- 20 


27 85 


A9 32 


85 FD 


20 


8B3B- 


EA EA EA EA EA EA EA EA 


8D48- 


EA EA EA EA EA EA EA EA 



Com pu Ironie 



1® 


^S** 1 


® 


BD50- EA EA EA EA EA EA EA EA 


BF60- EA EA EA EA EA EA EA EA 


9170- 


EA EA EA EA EA EA EA EA 


8D58- EA EA EA EA EA EA EA EA 


BF6B- EA EA EA EA EA EA EA EA 


917B- 


EA EA EA EA EA EA EA EA 


8D60- EA EA EA EA EA EA EA EA 


8F70- EA EA EA EA EA EA EA EA 


91B0- 


EA EA EA EA EA EA EA EA 


8D6B- EA EA EA EA EA EA EA EA 


BF78- EA EA EA EA EA EA EA EA 


9188- 


EA EA EA EA EA EA EA EA 


BD70- EA EA EA EA EA EA EA EA 


8F80- EA EA EA EA EA EA EA EA 


9190- 


EA EA EA EA EA EA EA EA 


8D78- EA EA EA EA EA EA EA EA 


8FBB- EA EA EA EA EA EA EA EA 


9198- 


EA EA EA EA EA EA EA EA 


8DB0- EA EA EA EA EA EA EA EA 


8F90- EA EA EA EA EA EA EA EA 


91A0- 


EA EA EA EA EA EA EA EA 


8D88- EA EA EA EA EA EA EA EA 


BF98- EA EA EA EA EA EA EA EA 


91A8- 


EA EA EA EA EA EA EA EA 


BD90- EA EA EA EA EA EA EA EA 


BFA0- EA EA EA EA EA EA EA EA 


91B0- 


EA EA EA EA EA EA EA EA 


BD98- EA EA EA EA EA EA EA EA 


BFAB- EA EA EA EA EA EA EA EA 


91B8- 


EA EA EA EA EA EA EA EA 


8DA0- EA EA EA EA EA EA EA EA 


BFB0- EA EA EA EA EA EA EA EA 


91C0- 


EA EA EA EA EA EA EA EA 


8DA8- EA EA EA EA EA EA EA EA 


8FB8- EA EA EA EA EA EA EA EA 


91C8- 


EA EA EA EA EA EA EA EA 


8DB0- EA EA EA EA EA EA EA EA 


8FC0- EA EA EA EA EA EA EA EA 


91D0- 


EA EA EA EA EA EA EA EA 


BDB8- EA EA EA EA EA EA EA EA 


SFCB- EA EA EA EA EA EA EA EA 


91D8- 


EA EA EA EA EA EA EA EA 


BDC0- EA EA EA EA EA EA EA EA 


SFD0- EA EA EA EA EA EA EA EA 


91E0- 


EA EA EA EA EA EA EA EA 


8DC8- EA EA EA EA EA EA EA EA 


BFD8- EA EA EA EA EA EA EA EA 


91E8- 


EA EA EA EA EA EA EA EA 


SDD0- EA EA EA EA EA EA EA EA 


8FE0- EA EA EA EA EA EA EA EA 


91F0- 


EA EA EA EA EA EA EA EA 


8DD8- EA EA EA EA EA EA EA EA 


BFE8- EA EA EA EA EA EA EA EA 


91F8- 


EA EA EA EA EA EA EA EA 


BDE0- EA EA EA EA EA EA EA EA 


8FF0- EA EA EA EA EA EA EA EA 


9200- 


EA EA EA EA EA EA EA EA 


BDEB- EA EA EA EA EA EA EA EA 


BFF8- EA EA EA EA EA EA EA EA 


9208- 


EA EA EA EA EA EA EA EA 


8DF0- EA EA EA EA EA EA EA EA 


9000- EA EA EA EA EA EA EA EA 


9210- 


EA EA EA EA EA EA EA EA 


8DF8- EA EA EA EA EA EA EA EA 


9008- EA EA EA EA EA EA EA EA 


9218- 


EA EA EA EA EA EA EA EA 


8E00- EA EA EA EA EA EA EA EA 


9010- EA EA EA EA EA EA EA EA 


9220- 


EA EA EA EA EA EA EA EA 


8E0B- EA EA EA EA EA EA EA EA 


9018- EA EA EA EA EA EA EA EA 


9228- 


EA EA EA EA EA EA EA EA 


8E10- EA EA EA EA EA EA EA EA 


9020- EA EA EA EA EA EA EA EA 


9230- 


EA EA EA EA EA EA EA EA 


BE1B- EA EA EA EA EA EA EA EA 


9028- EA EA EA EA EA EA EA EA 


9238- 


EA EA EA EA EA EA EA EA 


BE20- EA EA EA EA EA EA EA EA 


9030- EA EA EA EA EA EA EA EA 


9240- 


EA EA EA EA EA EA EA EA 


BE2S- EA EA EA EA EA EA EA EA 


9038- EA EA EA EA EA EA EA EA 


9248- 


EA EA EA EA EA EA EA EA 


BE30- EA EA EA EA EA EA EA EA 


9040- EA EA EA EA EA EA EA EA 


9250- 


EA EA EA EA EA EA EA EA 


BE3B- EA EA EA EA EA EA EA EA 


9048- EA EA EA EA EA EA EA EA 


9258- 


EA EA EA EA EA EA EA EA 


8E40- EA EA EA EA EA EA EA EA 


9050- EA EA EA EA EA EA EA EA 


9260- 


EA EA EA EA EA EA EA EA 


BE4S- EA EA EA EA EA EA EA EA 


9058- EA EA EA EA EA EA EA EA 


9268- 


EA EA EA EA EA EA EA EA 


8E50- EA EA EA EA EA EA EA EA 


9060- EA EA EA EA EA EA EA EA 


9270- 


EA EA EA EA EA EA EA EA 


SE58- EA EA EA EA EA EA EA EA 


9068- EA EA EA EA EA EA EA EA 


9278- 


EA EA EA EA EA EA EA EA 


8E60- EA EA EA EA EA EA EA EA 


9070- EA EA EA EA EA EA EA EA 


9280- 


EA EA EA EA EA EA EA EA 


BE68- EA EA EA EA EA EA EA EA 


907B- EA EA EA EA EA EA EA EA 


92BB- 


EA EA EA EA EA EA EA EA 


BE70- EA EA EA EA EA EA EA EA 


9080- EA EA EA EA EA EA EA EA 


9290- 


EA EA EA EA EA EA EA EA 


BE7B- EA EA EA EA EA EA EA EA 


9088- EA EA EA EA EA EA EA EA 


9298- 


EA EA EA EA EA EA EA EA 


8E80- EA EA EA EA EA EA EA EA 


9090- EA EA EA EA EA EA EA EA 


92A0- 


EA EA EA EA EA EA EA EA 


BEB8- EA EA EA EA EA EA EA EA 


9098- EA EA EA EA EA EA EA EA 


92AB- 


EA EA EA EA EA EA EA EA 


8E90- EA EA EA EA EA EA EA EA 


90A0- EA EA EA EA EA EA EA EA 


92B0- 


EA EA EA EA EA EA EA EA 


8E98- EA EA EA EA EA EA EA EA 


90AB- EA EA EA EA EA EA EA EA 


92BB- 


EA EA EA EA EA EA EA EA 


8EA0- EA EA EA EA EA EA EA EA 


90B0- EA EA EA EA EA EA EA EA 


92C0- 


EA EA EA EA EA EA EA EA 


8EA8- EA EA EA EA EA EA EA EA 


90BB- EA EA EA EA EA EA EA EA 


92C8- 


EA EA EA EA EA EA EA EA 


BEB0- EA EA EA EA EA EA EA EA 


90C0- EA EA EA EA EA EA EA EA 


92D0- 


EA EA EA EA EA EA EA EA 


8EBB- EA EA EA EA EA EA EA EA 


90C8- EA EA EA EA EA EA EA EA 


92D8- 


EA EA EA EA EA EA EA EA 


8EC0- EA EA EA EA EA EA EA EA 


90D0- EA EA EA EA EA EA EA EA 


92E0- 


EA EA EA EA EA EA EA EA 


BEC8- EA EA EA EA EA EA EA EA 


90D8- EA EA EA EA EA EA EA EA 


92ES- 


EA EA EA EA EA EA EA EA 


8ED0- EA EA EA EA EA EA EA EA 


90E0- EA EA EA EA EA EA EA EA 


92F0- 


EA EA EA EA EA EA EA EA 


8EDB- EA EA EA EA EA EA EA EA 


90E8- EA EA EA EA EA EA EA EA 


92FB- 


EA EA EA EA EA EA EA EA 


8EE0- EA EA EA EA EA EA EA EA 


90F0- EA EA EA EA EA EA EA EA 


9300- 


EA EA EA EA EA EA EA EA 


BEEB- EA EA EA EA EA EA EA EA 


90F8- EA EA EA EA EA EA EA EA 


9308- 


EA EA EA EA EA EA EA EA 


8EF0- EA EA EA EA EA EA EA EA 


9100- EA EA EA EA EA EA EA EA 


9310- 


EA EA EA EA EA EA EA EA 


BEF8- EA EA EA EA EA EA EA EA 


9108- EA EA EA EA EA EA EA EA 


9318- 


EA EA EA EA EA EA EA EA 


8F00- EA EA EA EA EA EA EA EA 


9110- EA EA EA EA EA EA EA EA 


9320- 


EA EA EA EA EA EA EA EA 


8F0B- EA EA EA EA EA EA EA EA 


9118- EA EA EA EA EA EA EA EA 


9328- 


EA EA EA EA EA C8 C4 46 


8F10- EA EA EA EA EA EA EA EA 


9120- EA EA EA EA EA EA EA EA 


9330- 


DO 08 68 68 20 EE 93 4C 


BF 18- EA EA EA EA EA EA EA EA 


9128- EA EA EA EA EA EA EA EA 


9338- 


6A 83 60 Bl 71 C9 30 90 


8F20- EA EA EA EA EA EA EA EA 


9130- EA EA EA EA EA EA EA EA 


9340™ 


0C C9 3A 90 0D C9 41 90 


BF28- EA EA EA EA EA EA EA EA 


9138- EA EA EA EA EA EA EA EA 


9348- 


04 C9 47 90 05 A2 2A 4C 


BF30- EA EA EA EA EA EA EA EA 


9140- EA EA EA EA EA EA EA EA 


9350- 


12 D4 C9 41 B0 03 E9 2F 


BF3B- EA EA EA EA EA EA EA EA 


9148- EA EA EA EA EA EA EA EA 


9358- 


60 E9 37 60 AD 01 0C C9 


8F40- EA EA EA EA EA EA EA EA 


9150- EA EA EA EA EA EA EA EA 


9360- 


.80 F0 03 4Q 10 D4 60 BD 


BF48- EA EA EA EA EA EA EA EA 


9158- EA EA EA EA EA EA EA EA 


9368- 


00 03 85 00 BD 10 03 85 


BF50- EA EA EA EA EA EA EA EA 


9160- EA EA EA EA EA EA EA EA 


9370- 


01 BD 20 03 85 02 BD 30 


8F58- EA EA EA EA EA EA EA EA 


9168- EA EA EA EA EA EA EA EA 


937B- 


03 85 03 BD 40 03 85 04 



Computronic 



KU** 1 



93B0- 
93B8- 
9390- 
939S- 
93A0- 
93A8- 
93B0- 
93B8- 
93C0- 
93C8- 
93D0- 
93DB- 
93E0- 
93E8- 
93F0- 
93F8- 
9400- 
9408- 
9410- 
9418- 
9420- 
942B- 
9430- 
9438- 
9440- 
9448- 
9450- 



BD 50 
B5 06 
80 03 
B9 BD 
03 B5 
Dl B8 
00 A9 
B7 80 
A9 C7 

93 20 
60 A0 

08 20 
00 A9 
F9 93 
A9 AF 
60 E6 

94 00 
AB 00 
C6 00 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
4D 06 

09 FF 
FF FF 



03 85 
BD 70 
85 0S 
A0 03 
0B 60 
D0 05 
Cl Dl 
60 20 
Dl B8 
90 80 
00 A9 
F9 93 
C5 Dl 
20 86 
Dl BS 
B8 D0 
8E 00 
BD 00 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
42 93 
FF FF 
FF FF 



05 BD 
03 85 
BD 90 
B5 0A 
A0 00 
20 9E 
B8 D0 
Dl 93 
D0 06 
A5 FC 
23 Dl 
20 39 
BB D0 
B0 60 
F0 03 
02 E6 
AC 00 
B4 00 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
B3 2E 
FF FF 
FF FF 



60 03 
07 BD 
03 85 
BD B0 
A9 23 
80 A0 
03 20 
A0 00 
20 F9 
B5 D5 
B8 D0 
80 A0 
06 20 
A0 00 
68 68 
B9 60 
8D 00 
03 00 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
67 0E 
FF FF 
FF FF 



9458- 

9460- 

946B- 

9470- 

9478- 

9480- 

9488- 

9490- 

9498- 

94A0- 

94A8- 

94B0- 

94B8- 

94C0- 

94CB- 

94D0- 

94DB- 

94E0- 

94E8- 

j 94F0- 

| 94F8- 

{ 9500- 

! 950B- 

! 9510- 

j 9518- 

! 9520- 

! 9528- 



FF FF 
Bl 82 
B5 FF 
FF FF 
FF FF 
00 00 
80 80 
00 00 
80 80 
00 00 
80 80 
00 00 
80 80 
28 28 
A8 A8 
2B 28 
A8 AB 
28 28 
A8 A8 
28 28 
AB AB 
50 50 
D0 D0 
50 50 
00 D0 
50 50 
D0 D0 



FF FF 
B2 82 
FF FF 
FF FF 
FF FF 
00 00 
80 80 
00 00 
80 80 
00 00 
80 80 
00 00 
80 80 
28 28 
AB AB 
28 28 
AB A8 
28 28 
A8 AB 
28 28 
AB A8 
50 50 
D0 D0 
50 50 
D0 D0 
50 50 

D0 D0 

I 



FF 


FF 


FF 


FF 


82 


83 


83 


B4 


FF 


FF 


FF 


FF 


FF 


FF 


FF 


FF 


FF 


FF 


FF 


FF 


00 


00 


00 


00 


80 


80 


B0 


80 


00 


00 


00 


00 


80 


80 


B0 


80 


00 


00 


00 


00 


80 


80 


B0 


80 


00 


00 


00 


00 


80 


80 


B0 


80 


28 


28 


28 


28 


AB 


A8 


AB 


A8 


28 


28 


28 


28 


A8 


AB 


A8 


AB 


28 


28 


28 


28 


AB 


A8 


AB 


AS 


28 


28 


28 


28 


AB 


A8 


AB 


AB 


50 


50 


50 


50 


D0 


D0 


00 


D0 


50 


50 


50 


50 


D0 


D0 


D0 


D0 


50 


50 


50 


50 


00 


D0 


D0 


D0 



9530- 
9538- 
9540- 
9548- 
9550- 
9558- 
9560- 
9568- 
9570- 
9578- 
9580- 
9588- 
9590- 
959B- 
95A0- 
95A8- 
95B0- 
95B8- 
95C0- 
95C8- 
95D0- 
95DB- 
95E0- 
95EB- 
95F0- 



50 50 
D0 D0 
00 04 

00 04 

01 05 

01 05 

02 06 

02 06 

03 07 
03 07 
00 04 

00 04 

01 05 

01 05 

02 06 

02 06 

03 07 
03 07 
00 04 

00 04 

01 05 

01 05 

02 06 
02 06 
03 



50 50 
D0 D0 

0B 0C 

08 ac 

09 0D 
09 00 
0A 0E 
0A 0E 
0B 0F 
0B 0F 
08 0C 

08 0C 

09 0D 
09 00 
0A 0E 
0A 0E 
0B 0F 
0B 0F 
0B 0C 

08 0C 

09 00 
09 00 
0A 0E 
0A 0E 



11 
11 



50 50 50 
D0 D0 D0 
10 14 18 
10 14 18 
15 19 
15 19 
12 16 1A 

12 16 1A 

13 17 1B 
13 17 1B 
10 14 18 
10 14 18 

15 19 
15 19 
12 16 1A 

12 16 1A 

13 17 1B 
13 17 1B 
10 14 1B 

10 14 18 

11 15 19 

11 15 19 

12 16 1A 
12 16 1A 



11 
11 



50 
D0 
IC 
IC 
1D 
10 

iE 

IE 
1F 
1F 
IC 
IC 
1D 
10 
IE 
IE 
1F 
1F 
IC 
IC 
1D 
1D 
IE 
IE 



Ende des Listings 



Verdienen Sie Geld mit Ihrem Computer! 



Bewerbung als Programmautor 



Name: 
Straße: 



Vorname : 



Alter: 



■Wohnort: 



Titel des Programmes: 



Computersystem 



Erforderlicher Speicherplatz: 
Erforderliche Peripherie: 



kBytes 



Ich versichere hiermit, daß ich der Autor des oben genannten Programmes bin und alle Rechte besitze. Ich bin 
damit einverstanden, daß Sie mein Programm in einer Ihrer Zeitschriften abdrucken und /oder dieses ander- 
weitig kommerziell verwenden. Das einmalige Honorar beträgt im Falle einer Veröffentlichung 120, - DM pro 
komplett abgedruckter Seite. Sollte das Programm nicht veröffentlicht werden, so bitte ich um Rücksendung 
meiner Unterlagen. 

Folgende Unterlagen liegen diesem Schreiben bei: 

Kassette: _____ Diskette: __„ Dokumentation: _„_^_ Listing: Rückporto: ^_____ 



Unterschrift des Programmautors: 



Anschrift: Tronic- Verlag, Am St ad 35 - 3440 Eschwege 



84 



Com putro nie 




RBQ-PASCAL-IOJRS Teil * 



Die Gewinner 

„Rien ne va plus!" Mit diesem Ausspruch endet die Spielrande der 

Computronic 4/87. Lustige Geschichten waren gefragt, folgendes 

kam bei raus: 

Aus einem Aufsatz: Als Gretel die Hexe gegrillt hatte, lief sie erregt 

zum Hansel und öffnete sein Ställchen. 

Peter Boekamp, 4971 Hüllhorst 

Aus der Schule geplaudert: Unsere Physiklehrerin nahm sich vor, 
ans in einer Lehrprobe den Freien Fall zu demonstrieren. Das 
Treppenhaus unserer Schule war dafür ein geeigneter Versuchsort. 
Wir standen nun in der vierten Etage und wollten abstoppen, wie 
lange ein Stein braucht, um von hier auf den Kellerboden zu fallen. 
Unsere Lehrerin hielt also in einer Hand die Stoppuhr und in der 
anderen den Stein. Sie rief nun: „Eins, zwei, drei!" ließ die Stopp- 
uhr los und drückte auf den Stein. Die Lehrprobe war natürlich ge- 
laufen. 

Nach einigen Sekunden war zu vernehmen, wie die Stoppuhr ge- 
räuschvoll ihr Ziel erreichte. 
Gunnar Brandenburg, 1000 Berlin 30 

Altersbedingt: Als meine Oma zum ersten Mal in ihrem Leben in 
ein Auto stieg, war sie schon 82 Jahre alt. Ich fuhr also mit ihr los. 
Angstlich beobachtete sie, wie ich in andere Gänge schaltete. Erst 
nach mehreren Kilometern wagte sie es, mich anzusprechen: „Mäd- 
chen, achte Du lieher auf die Straße, das Benzin kann ich ja umrüh- 
ren." 

Ich bog mich vor Lachen und mußte auf dem nächsten Parkplatz 
halten. Das war das erste und letzte Mal, daß meine Oma im Auto 
gefahren ist. 
Heidrun Albrecht, 2847 Barnstorf 

Die Kirche als Schauplatz: Neulich saß ich in der Kirche, da hat sich 
doch tatsächlich eine Oma neben mir eine Zigarette angezündet. Da 
ist mir doch glatt das Bier aus der Hand gefallen. 

Birgo Meier, 4459 Enlichheim 

Turbo-Pascal-Kurs 

Der Mengentyp (SET) 

Eine Menge (SET) ist eine Zusammenfas- 
sung mehrerer Obekte des selben Typs. Je- 
des einzelne Obekt einer Menge nennt 
man Element. 

Regel: SET OF Basistyp 

Der Basistyp muß ein einfacher Typ sein 
(ohne REAL) (z.B. auch Aufzählungsty- 
pen). Weiter muß beachtet werden, daß in 
einer Menge maximal 256 Elemente sind 
und die Ordnungszahl (ord(Variable)) der 
Elemente darf nicht größer als 255 sein 
(z.B. darf die INTEGER-Zahl 500 nicht 
drin sein, weil ord(500) = 500 ist). 

Beispiele: 

rYPE 

Computronic 



Fremdsprachen: Was heißt Condom auf niederländisch? -Antwort: 
Pipi Langstrumpf! 

Martin Goerke, 2104 Hamburg 92 

Der Wettbewerb 

Echt klasse, Herr Schröder! Diesmal hat sich die Redaktion wieder 
etwas ganz Gemeines ausgedacht. In dieser Ausgabe muß ein „Lo- 
gical" gelöst werden. Ihr müßt Martina, Manfred, Bernd, Philipp 
und Thomas jeweils die entsprechende Zigarettensorte, Automarke 
und deren Lieblingstier zuordnen. 

Zigarettensorten ; West, Marlboro, Benson & Hedges, Vannelle, Ca- 
mel. 

Automarken: Talbot, Suzuki, Ford, Audi, Opel 

Lieblingstiere: Panda, Elefant, Papagei, Hund, Wildschwein. 

Folgende Hinweise gibt die Redaktion: 

1. Bernd raucht Vannelle und mag keine Papageien. 

2. Der Suzuki-Fahrer liebt Papageien. 

3. Martina fährt keinen Opel und mag Elefanten. 

4. Der Benson 6 Hedges-Raucher mag Wildschweine nicht und 
fährt Talbot. 

5. Der Ford- Fahrer ist auf den Hund gekommen und raucht nicht 
Camel, 

6. Der Marlboro- Raucher hat einen Papagei. *' 

7. Der Talbot-Fahrer ist ein Panda-Fan und heißt Manfred. 

8. Philipp raucht Camel und mag keine Papageien. 

Natürlich gibt es wieder fünf Programme aus dem Repertoire des 
Tronic-Verlags zu gewinnen? 

Jetzt laßt einmal Euren Scharfsinn spielen. Mit ein wenig Geduld 
kommt Ihr sicher auf die Lösung. Viel Spaß wünscht die Redaktion. 



Buchstaben =SET OF 'A' :a 'Z 5 ; 
Ziffern = SET OF '0' :a '9';' 

Wochentage = SET OF (mon,die,mit 

don,fre,sam,son); 
gross_undJdeinbuchstaben — 
SET OF ('A' :a 'Z','a' :a 'z'); 



Eine Menge kann auch lediglich innerhalb 
eines Programms angegeben werden. 
Dann werden die Elemente in eckigen 
Klammern aufgeführt. 

Das Ganze hat etwas Ähnlichkeit mit dem 
ARRAY. Aber die Mengen unterscheiden 
sich deutlich vom ARRAY. 

1. Es gibt keine Rangordnung. Die Mengen 
[1,3,5], [1,5,3] und [5,3,1] sind gleich. 

2. Jedes Element ist in einer Menge nur 
einmal vertreten. Die Mengen [1,3,5,1] 
und [1,3,5] sind deshalb ebenfalls gleich. 

3. Eine Menge kann nur als Ganzes anges- 
prochen werden. Ein Zugriff auf einzelne 



(Fortsetzung Teil 5) 

Elemente mit einem Index (wie beim AR- 
RAY) ist also nicht möglich. 



Was im einzelnen mit diesem Mengentyp 
gemacht werden kann, können wir hier 
nicht darstellen, weil dies den Rahmen ei- 
nes Einfuhrungskurses sprengen würde. 
Eine Anwendung wollen wir jedoch zei- 
gen, für die sich der Mengentyp hervorra- 
gend eignet. 



Aufgabe: Es soll von der Tastatur ein Zei- 
chen eingelesen und jeweils entschieden 
werden, ob es ein Vokal ist oder nicht. 

Das Programm könnte folgendermaßen 
aussehen: 



PROGRAM Vokaltest; 
VAR zeichen: char; 
BEGIN 

clrscr; 

REPEAT 



1 TURBO-PASCAL • TURBO-PASCAL i 



6: write('Bitte ein Zeichen eingeben 

(„0" fuer Ende): '); 
7: readln(zeichen); 

8: IF (zeichen='A') OR (zeichen= 

'E') OR (zeichen=T) OR 
9: (zeichen='0') OR (zeichen='U') 

OR (zeichen='a') OR 
10: (zeichen='e') OR (zeichen=T) 

OR (zeichen^V) OR 
11: (zeichen='u') 

12: THEN writeln (zeichen,' ist ein 

Vokal') 
13: ELSE writeln(zeichen,' ist kein 

Vokal'); 
14: writeln; 
15: UNTIL zeichen='0' 
16: END. 

Über die IF- Bedingung braucht man wohl 
nicht viel zu sagen. Man kann sie natürlich 
verstehen, wenn man sie in Ruhe durch- 
liest, aber übersichtlich ist sie bestimmt 
nicht. Deshalb gleich ein Programm, in 
dem die IF-Bedingung mit Hilfe einer 
Menge formuliert wird. 

1: PROGRAM Vokaltest-2; 
2: VAR zeichen : char; 
3: BEGIN 

4: clrscr; 

5: REPEAT 

6: write{'Bitte ein Zeichen eingeben 

(„0" fuer Ende): '); 
7: readln(zeichen); 

8: IF zeichen IN [AVE'/I'/O'/U', 

'aVe'/iVo'/u'] 

9: THEN writeln(zeichen,' ist ein 

Vokal') 
10: ELSE writeln(zeichen,' ist kein 

Vokal'); 
11: writeln; 

12: UNTIL zeichen = '0' 
13: END. 

Diese Verbesserung spricht wohl für sich 
selbst. Ihr seht bei diesem Beispiel auch, 
daß man in einem Programm eine Menge 
angeben kann. Die Regel (Syntax) für die 
Abfrage, ob ein bestimmtes Zeichen in ei- 
ner Menge enthalten ist, lautet: 
bestimmtes_Zeichen IN Menge 
In unserem Beispiel wurde diese Abfrage 
in eine IF-Anweisung gesteckt. (Bei einer 
WHILE-Schleife würde so eine Mengen- 
abfrage folgendermaßen aussehen: 
WHILE best_Zeichen IN Menge DO) 

Gleich noch ein kurzes Beispiel für die 
übersichtliche Abfrage mit Mengen. Es 
soll beispielsweise geprüft werden, ob ein 
Zeichen eine Ziffer ist. Die Bedingung 
ohne Menge wäre: 

IF (zeichen >='0') AND (zeichen <='9') 
THEN . . . 



Die Alternative mit einer Menge: 
IF zeichen IN ['0' . . '9'] THEN . . . 

Der RECORD-Typ 

Die Datentypen, die du bisher kennenlernt 
hast, und die aus mehreren Elemente be- 
stehen (ARRAY, Menge, STRING) hatten 
gemeinsam, daß die einzelnen Elemente 
den gleichen Datentyp haben müssen. 
Zum Beispiel kann ein ARRAY nur Ele- 
mente vom Typ INTEGER oder nur Ele- 
mente vom Typ CHAR haben. Mit dem 
RECORD-Typ ist es möglich, Elemente 
zusammenzufassen zu einem Datentyp, 
die aus verschiedenen Datentypen beste- 
hen. 

Nehmen wir als Beispiel eine Adressenda- 
tei, die folgendermaßen aufgebaut ist: Die 
einzelnen Adressen sind auf Karteikarten 
geschrieben und in einem Karteikasten 
untergebracht. Auf einer Karteikarte ist je- 
weils eine Adresse untergebracht. Jede 
Adresse besteht aus folgenden Informatio- 
nen: 

Name, Vorname, Straße, Hausnummer, 
Postleitzahl, Ort, Telefon 

Eine solche Karteikarte bezeichnet man 
auch als einen Datensatz (aus der gesam- 
ten Datei, die im Karteikasten ist). Diese 
Einheit eines Datensatzes kann nun in 
Pascal ausgedruckt werden, indem man ei- 
nen RECORD definiert, der aus den oben 
aufgeführten Bestandteilen besteht. Da- 
mit ist dann auch verständlich, warum der 
RECORD auch als Datensatz bzw. als Ver- 
bund bezeichnet wird. 



TYPE AdrKartei = RECORD 


Name 


STRING [25]; 


Vorname 


STRING [15]; 


Strasse 


STRING [25]; 


Hausnr 


1..1000; 


PLZ 


1000..9999; 


Ort 


STRING [25]; 


Telefon 


STRING [10] 



Die RECORD-Definition beginnt also mit 
dem reservierten Wort RECORD und en- 
det mit END. Dazwischen werden die ein- 
zelnen Bestandteile so definiert, wie du 
das aus der Variablen- Deklaration schon 
kennst. Auch können die bekannten Da- 
tentypen verwendet werden (z. B. ARRAY, 
SET etc.). 

Auf jedes einzelne Element des RE- 
CORDS kann zugegriffen werden. Dabei 
gibt es eine bestimmte Regel, die wir gleich 
mal demonstrieren, indem ein Datensatz 
mit Werten gefüllt wird. Die Anweisung 
dafür sieht folgendermaßen aus: 

I (Im Deklarationsteil muß eine Variable 



„Adresse" vom Typ „AdrKartei" definiert 
worden sein: VAR Adresse: AdrKartei) 



BEGINN 
Adresse. Name 
Adresse Vorname 
Adresse. Strasse 
Adresse.Hausnr 
Adresse. PLZ 
Adresse.Ort 
Adresse. Telefon 
END. 



= 'Mueller'; 

- 'Hans'; 

= 'Hauptstrasse'; 

= 13; 

= 1000; 

-'Berlin'; 

= '123 45 67' 



Der Zugriff auf ein Feld eines RECORDS 
geschieht also nach folgender Regel: 
Name_des_Records . Name_des_Feldes 

„Ganz schön umständlich", wirst du sagen. 
„Und viel Tipparbeit", allein beim Ausfal- 
len unseres Datensatzes. Damit hast du 
recht. Diese Arbeit kann kan jedoch erheb- 
lich verringern. Wir werden das gleich am 
Beispiel zeigen: 



BEGINN 




WITH Adresse DO 


Beginn 


Name • 


= 'Mueller'; 


Vorname 


: = 'Hans'; 


Strasse 


= 'Hauptstrasse 


Hausnr 


= 13; 


PLZ 


= 1000; 


Ort : 


= 'Berlin'; 


Telefon : 


= '123 45 67' 


END 
END. v 





Zu Beginn der Zuweisungen passiert fol- 
gendes: Dem Computer wird „gesagt": Mit 
(WITH) dem Record „Adresse" mache fol- 
gendes (DO). Jetzt „weiß" der Rechner, daß 
die Variable „Name" zum Record „Adres- 
se" gehört usw. 

Es mag sein, daß dir das ganze sehr kom- 
pliziert vorkommt und du überhaupt nicht 
verstehst, worin der Vorteil eines Records 
liegen soll, wenn alle Elemente dann doch 
einzeln verarbeitet werden müssen. Dazu 
kurz zwei Anmerkungen: 1. Der Vorteil 
des Records liegt wieder in der Programm- 
klarheit. Man sieht nämlich sofort, zu wel- 
cher Einheit ein einzelnes Element gehört 
(oft hat man nämlich mehr als einen Re- 
cord). 

2. Ein wesentlicher Vorteil des Record wird 
dir erst klar, wenn du Funktionen und Pro- 
zeduren kennengelernt hast und Verarbei- 
tung von Files. Hier ist es nämlich mög- 
lich, einen Record in „einem Stack" zur 
Weiterverarbeitung zu übergeben. Da wird 
dann der Vorteil sehr schnell deutlich. Also 
noch ein bißchen Geduld. 
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So lange der Vorrat reidit f werden die unten 
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Jetzt beißt es, blitzschnell zugreifen! 



C-64 

l.Tron/Mercurius / Jump Man /TheWay/ 
Space Taxi / Mr. Postmann / Moontunnel / 
Moonralley / Steinschlag 

Kas$.;WCKim Disk: WCD 1/86 15,- DM 

2.Interceptor Base / Schotter/ Fight Night / 
Monsterjagd / Colossus Mühle / Stonage 
Comic / Deadly Mission 

Kass.: WCK 2/86 Disk: WCD 2/86 15,- DM 

VC 20 

1. Brückenbau / Jango / Bergshooting / 
Bobby in Action / Hot Food / Men-Rescue 
Soundprogramm 

Kass.: WYK 1/86 IS,- DM 

2. Miner, der Fassadenstreicher / Inka- 
schatz / Josef in den Katakomben / Castle 
Dracula / Ufo Destroyer 

Kass.: WVK 2/86 15,-DM 

Computronic 



C-16 

Horror Castle / Fantasy County / Gold- 
rausch / Moon Fighter / Frogger / Humor / 
Cosmic Tressor / Schwimmen / Break In 

Kass.: WOKl/86 Disk: WOD1/86 15,-DM 



TI 99 / 4 Ä 

1. Jäger des verlorenen Schatzes / Wande- 
rer / Dessert Attack / Pitfall / Odysee 

Kass.: WTK 1/86 15,-DM 

2. Thai Boxing / Scootie / Tutanchamon's 
Tomb 

Kass.: WTK 2/86 js, - DM 



Atari 

Groove / Cavehunt / Boulder Dash / 
Smurf / Grisu / Dragon's Lair 

Kass. : WJK 1/86 JJ, _ DM 



Apple 

Prodata / Music Editor / Pac Boy / 3D-Irr- 
garten / Jump Man / Astro War / Tontau- 
benschießen 

Disk: WAP 1/86 15,-DM 

Schneider 

1. Schneider Panik / Killer Ship / Spider 
Maze / Star Patrol / Helicopter Pilot 

Kass.: WSRK1/86 15, - DM Disk: WSRD 1/86 19,50 DM 

2.Midnight / Horror Caves /Triton / Traum- 
land / Red Alert / Speedy Frogs / Aurion 

Käss,.- WSRK 2/86 15, - DM Disk: WSRD 2/86 19,50 DM 

Spectram 

1. Karl der Käfer / Car Crash / Cosmische 
Arche / Cherry Jerry / Air Speeder 

Kass.: WSK 1/86 15,-DM 

2. Otto Schweinsohr / Ausschnittkopierer / 
Zone -M, / Der Spion / 3-Defens 

15,-DM 



Kass.: WSK 2/86 
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SPITZE 



Was für ein Angebot! Programm-Pakete zu 

unglaublichen Preisen! Greifen Sie zu! 

Hier sind sie, unsere 

SUPERPAKETE 



SPITZE 




Superpakef 1 
Spiele 

Monster Attack / Projekt / High Noon / 
Brieftaube / Cadelon / Turbo Jet / Sea At- 
tack /The Maze Graze Game / Galaxi / Spa- 
ce Comets / Skeet / Vampir / Memory 



Kassette 20,- 
Diskette 20,- 



SP-C-K-1 
SP-C-D-1 



Superpaket 2 
Spiele 

Tank Duell / Astronaut / Jungle 1 / Jungle 2 
/ Sufo / Fire Legion / Spiders / Star Battle / 
Super Breakout / Mission Rescue / Road- 
painter / Moonsweeper / Scotti 

SP-C-K-2 Kassette 20 - 

SP-C-D-2 Diskette 20,- 



Superpaket 3 
Anwender 

The Basic / Basicreset / Data-Generator / 
Print- Generator / Supermon-64 / Restore 
N / Disky 1.0 / Fill-Loader / Funktions- 
tasten-Belegung / Autostart / Multibasic / 
Bildeditor / Spritehilfe+Demo / Autonum- 
ber / Micro- Tools+Mloader 



SP-C-K-3 
SP-C-D-3 



Kassette 20,- 
Diskette 20,- 




Superpaket 1 
Spiele 

Horror Castle / Fantasy County / Senso / 
Jumping Joe / Schatztaucher / Shaolin / Ci- 
ty Runner 



SP-O-K-1 
SP-O-D-1 



Kassette 20,- 
Diskette 20,- 



ATARI 



800 XL/130 XE 

Superpaket l 
Spiele 

Donkey Kong / Ball Harbour / Fighting / 
Diamond / Super Miner 



SP-I-K-1 
SP-I-D-1 



Superpaket 2 
Spiele 



Kassette 20,- 
Diskette 20,- 



Aquanaut / Jumping Ghost / Magic Fire / 
Cambodia / Splat 



SP-I-K-2 
SP-I-D-2 



Kassette 20,- 
Diskette 20,- 




Superpaket 1 
Anwender 

Soft Talker / Funktionstasten / Basic- Kon- 
verter / Hilfsprogramm / Disk- Menü- Ge- 
nerator / Super-Datei / Maskengenerator / 
Disk-Katalog / Painter / Musik-Maker 



APD 1/85 



Superpaket 2 
Spiele 



nur Diskette 27,- 



Hubschrauber / Castle of Döom / Bowling 
/ Donovan / Jumper / Tic- Tac-Toe / Dia- 
monds / Reversal / Fight / Karambolage 



APD 2/85 



nur Diskette 27,- 



Weiter geht's 




„Seit Wochen blätterst du in deiner Computronic. 
Könntest du mit nicht einmal in der Küche helfen? 



Computronic 
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SUPERPAKETE 



Schneider 



C^€Äk 



Superpaket 1 
Spiele 

Alien Hunter / Catch / Interceptor 3 D / Ci- 
ty Lander / Conan's Castle / Copter Patrool 
/ CPC Bert / Crash / Demon Attack / Duell 
/ Etis / Labyrinth / Miner/ Tower / Snider's 
Maze / Geister Schloß / Fallschirmspringer 
/ Secret Valley / Aladin / Haunted Castle / 
Cave Runner / Cobra / Erwin / Krümi / 
Q-Bert 



SP-SR-K-1 
SP-SR-D-1 



Superpaket 2 
Anwender 



Kassette 20,- 
Diskette 27,- 



Back up / Datagen / Datenverwaltung / Dis- 
copy / Monitor / Painter / Remkiller /SU- 
File / Tastaturbelegung 



SP-SR-K-2 
SP-SR-D-2 



Kassette 20,- 
Diskette 27,- 




Achtung: Die gesamten Tl-Programme 
laufen nur mit Extended Basic 



Superpaket 1 
Spiele 

Stardust / Miner 99 / Fire Fox / Maya I / 
Maya II / Jagdszene Chikago / Moon Race 
/ Slicks / Frogger / Alien Landing 



TPK 1/85 



• & 



nur Kassette 20,- 



ti 




Superpaket 1 
Spiele 

Andromeda / Wheely / Missile Comand / 
Frogger / Lui der Wurm / Jump / Solitaire / 
Squares / Oil Panic / Mr. Pacman / Pooyan / 
U-Jäger / Willibald 



SP-S-K-1 



nur Kassette 20,- 




Superpaket 1 
Spiele 

Flowers / Tanker / Jupiter Rescue / Einbre- 
cher / Hospital / Alien / Flipperball / Sub- 
Zone / Dr. Cerp / Geo- Zayxon / Froggies 
Night Mare / Punktefresser / Starwars / Sa- 
lavage Crew 



SP-V-1 



nur Kassette 20,- 



II 




Geben Sie mir jetzt sofort meine Computronic wieder! 




Bitte beachten Sm: Wenn Sie bei Ihrer Bestellung auf Vor- 
kasse zurückgreifen, sparen Sie viel Geld. 
Das gilt besonders für unsere ausländischen Computer- 
Freunde; da die Nebenkosten derart hoch sind, schicken wir 
keine Bestellung per Nachnahme ins Ausland. Schicken Sie 
uns deshalb einen Bar- oder Verrechnungsscheck, Postan- 
weisung oder Bargeld. (Die Nebenkosten in der Bundesre- 
publik Deutschland - Nachnahme - betragen 5,- DM) 



& 
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ti 



ti 



ti 



Bestellen Sie unter 



folgender Anschrift, 



TRONIC-VERLAG 

Am Stad 35 
3440 Eschwege 
Tel.: 05651/30011 
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* Vom Chefredakteur empfohlen: Brand(t) aktuelle Software * 




Programm 



Preis/ 
Kassette 



Preis/ 
Diskette 



Bestell-Nr. 



Tron/Mercurious 


15,— 


15,— 


C 13 


Interceptor Base/Schotter 


15,— 


15, — 


C 23 


Jump Man/The Way/Space Taxi 


15,— 


15, — 


C 33 


Fight Night/Monsterjagd/Colossus Mühle 


15,— 


15, — 


C 43 


Mr. Postman/Moontunnel/ 
Moonralley/ Steinschlag 


15,— 


15,— 


C 53 


Deadly Mission/Stoneage Comic 


15,— 


15 — 


C 63 


Taxi Driver/ Space Odyssey 


19,50 


19,50 


C 14 


Joe/Look Sharp 


19,50 


19,50 


C 24 


Turbo Racer/ Biene Maja 


19,50 


19,50 


C 34 


Rowly/Treasure Hunt 


19,50 


19,50 


C 44 


* Megabouncer/Haunted Irin 


19,50 


19,50 


C 54 




,Ganz klarer Fall von Computronic~Entzug, 



^ 



TI-99/4A 



Achtung: Die gesamten TI-Pro- 
gramme laufen nur mit Extended 
Basic 



Programm 



*Preis/ 
Kassette 



Bestell-Nr. 



Jäger des verlorenen Schatzes 


10,— 


T 


13 


Thai-Boxing 


10,— 


T 


23 


Wanderer/Dessert Attack 


12,— 


T 


33 


Scootie 


10,— 


T 


43 


Pitfall/Odysee 


12- 


T 


53 


Tutanchamon's Tomb 


10,— 


T 


63 


Cra2y Cowboy 


14,50 


T 


14 


Rubberball/Hugo 


14,50 


T 


24 


Jumping Miner 


14,50 


T 


34 


Square-Painter 


14,50 


T 


44 


* Biathlon 


14,50 


T 


54 




Programm 



Preis/ 
Kassette 



Preis/ 
Diskette 



Horror Castle/Fantasy County 


12,— 


- 


23 


Goldrausch/Moon Fighter 


10,- 


10,- 


33 


Frogger/Humor 


10 — 


10 — 


43 


Cosmic Terror/Schwimmen/Break In 


14,- . 


14,— 


53 


Panic/Phantom/Meteorstorm 


14- 


14, — 


63 


Hyper Space/Fiower 


m- 


18, — 


O 14 


Spacetrader/Save ourTurtles 


18,— 


18, — 


24 


Memory/Quadrato 


18,— 


18.— 


34 


Crazy Worm/Assaulf 


18,- 


IS- 


44 


*Tron/Time Rally/Goldfieber 


[8,~- 


IS— 


54 




Programm 



Preis/ 
Kassette 



Brückenbau/Jango 


14- 


V 13 


Miner, der Fassädenstreicher/Inkaschatz 


' 14,— 


V 23 


Bergshooting/Booby in Action 


14- 


V 33 


Josef in den Katakomben 


14 — 


V 43 


Hot Food/Men-Rescue/Soundprogramm 


14,— 


V 53 


Castle Dracu)a/UFO-Destroyer 


14,- 


V 63 


Cosmic Bouncer/Cave Rider 


14,— 


V 14 


Biathlon/Space Laboratory 


14,-' 


V 24 


Titan 


14,— 


V 34 


Race Driver 


14,- 


V 44 


* Saigon 


14,- 


V 54 




£>JnT ^ 




,Hier, damit auch sie sich ein Computronic-Abo 
besorgen können." 



90 



Computronio 



# Vom Chefredakteur empfohlen: Brand(t) aktuelle Software * 




800 XL (*600) 



Programm 



Preis/ Preis/ 

Kassette Diskette 



Bestell-Nr. 



Groovc 


14,- 


14,— 


I 


13A 


Treter/ Ca vchunt 


10- 


10 — 


I 


13B 


Top Tennis/Panzerschlacht 


14,— 


„ 


I 


23 


Expedition/Cavehunt 


- 


15,— 


1 


33 


Cavehunt 


10,— 


- 


I 


33A 


Boulder Dash 


14,— 


14 — 


1 


43 


Kitten/ Smurf 


- 


14,— 


I 


53 


Smurf 


10 — 


- 


I 


53 A 


Grisu/Dragon's Lair 


14 — 


14,— 


I 


63 


Ceres/Thc Whipping Top 


16,50 


16,50 


I 


14 


Moon Patrol/Butterflies/Pingu 


16,50 


16,50 


I 


24 


Into Deep/Biene Maja/Quadrato/Reversi 


16,50 


16,50 


I 


34 


CavenofDeath/Dr.Tom'sCastlc/Ghostly 


16,50 


16,50 


I 


44 


* Masterblazer/Kampf'stern Galactica 


16,50 


16,50 


I 


54 




,Letzte Meldung: Die neueste Computronic soll 
eine Kettenreaktion verursacht haben. 




Programm 



Preis/ 
Kassette 



Bestell-Nr. 



Karl der Käfer 


10,— 


S 13 


Otto Schweinsohr/Ausschnittkopierer 


12 — 


S 23 


Car Crash/Cosmische Arche 


12,— 


S 33 


Zonc-M 


10 — 


S 43 


Cherry Jerry /Air Speeder 


12.— 


S 53 


Der Spion/3-Defens 


12 — 


S 63 


Goldrunner 


16,50 


S 14 


Alien Command 


16,50 


S 24 


Oswald 


16,50 


S 34 


Jenseits von Andromeda/Superwall 


16,50 


S 44 


*Senso Plus 


16,50 


S 54 




Programm 


Preis/ 
Kassette 


Preis/ 
Diskette 


Bestell- Nr. 


Schneider Panik/Killer Ship 


12 — 


18,— 


SR 13 


Midnight/Horror Caves 


12,— 


IS,— 


SR 23 


Spider Maze 


12,— 


IS,— 


SR 33 


Triton/Traumfand 


12,— 


IS- 


SR 43 


Starpatrol/Helicopter Pilot 


12 — 


IS— 


SR 53 


Red Alert/Speedy-Frogs/Aurion 


12,— 


18,— 


SR 63 


Space Battle 


15,— 


20,— 


SR 14 


Pae Man/Procon-Delta/Hospital 


15,— 


20,— 


SR 24 


Kung-Fu Master 


15 — 


20,— 


SR 34 


Car Drive/ Flower of Venus 


IS- 


20,— 


SR 44 


* Shooting/Orbit-Chieane 


IS— 


20,— 


SR 54 



w*nppkz 



Programm 



Preis/ 
Diskette 



Bestell- Nr. 



Prodata/Music Editor 


10,— 


A 13 


Pac Boy 


10,— 


A 23 


3 D-Irrgarten 


10 — 


A 33 


Jump Man 


10 — 


A 43 


Astro War 


10 — 


A 53 


Tontaubenschießen 


10,— 


A 63 


Mariner V 


* 14,50 


A 14 


Front Fighter 


14,50 


A 24 


Enemy Attack 


14,50 


A 34 


Sub-Attack 


14,50 


A 44 


*Snackimacy 


14,50 


A 54 




,Na Fritz, auch wieder auf dem Weg zum Kiosk 
die neueste* Computronic holen." 



SONDER-SERVICE: Jetzt können Sie bis 19.00 h in unserem Verlag eine Bestellung aufgeben. 



Computronic 
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Das erste und einzi ge 
SOFTWARE-MAGAZIN 

Die aktuelle Ausgabe gibt's jetzt überall 




Die umfangreiche 

Information 

des 



100 Seiten Programme im Test 
der Software-Markt auf einen Blick 
speziell gesuchte Software kann direkt 
beim Hersteller bestellt werden 
für alle Anwender von Heimcomputern 



Sof tware-Marktei 



